我如何结合grep和子集与吹笛者

时间:2019-07-25 18:33:56

标签: r

我是tidyverse的新手。我的这段笨拙的代码将许多功能结合在一起

flow[grep(paste(paste(series, "J8","F", sep = "."), "TEMP",sep = "_")
                         , flow$Final.code), -1]

流是一个数据集。

有没有办法让我使用吹笛者重写此代码,以便于查看?

1 个答案:

答案 0 :(得分:0)

一种方法可能是:

flow %>%
  filter(str_detect(NAME_OF_-1_COLUMN, paste(paste(series, "J8","F", sep = "."), "TEMP", sep = "_")))

尚不清楚您的数据是什么,因此我不确定这是一个完美的解决方案。如果您使用grep命令来引用行名,则此方法无效。如果您想全面整理,请将paste()替换为str_c()

您还可以将粘贴信息分配给变量,并在需要考虑可读性的情况下使用它:

things_to_detect = paste(paste(series, "J8","F", sep = "."), "TEMP", sep = "_")

flow %>%
  filter(str_detect(NAME_OF_-1_COLUMN, things_to_detect))