str_detect 中的正则表达式？

Question

我有像c1c5, c5c1, c4c3 ...这样的colnames ...

我想检索所有以 c4 和 c5 开头或结尾的 colnames。

我试过使用以下方法:

str_detect(colnames(df), "c5c\\d+")

str_detect(colnames(df), "c4c\\d+")

str_detect(colnames(df), "c\\d+c4")

str_detect(colnames(df), "c\\d+c5")

有没有办法将它组合成一个表达式？请指教。

Answer 1

尝试使用sapply:

colnames(df)[sapply(X = colnames(df), FUN = function (X) substr(X, 1, 2) %in% c("c4", "c5") | substr(X, 3, 4) %in% c("c4", "c5"))]

有了这个，您将以“c4”或“c5”开始或结束colnames。

如果你有长度大于 4 的 colnames 或者你想使用不同于 "c4"或 "c5"的东西，你可以将它概括为:

patterns <- c("c4", "c5") #you can change it

colnames(df)[sapply(X = colnames(df), FUN = function (X) substr(X, 1, 2) %in% patterns  | substr(X, nchar(X) - 1, nchar(X)) %in% patterns )]

您甚至可以根据情况对其进行更多概括。