结合grepl和gsub用NA替换不需要的细胞

Question

我只对包含关键字或键号的单元格感兴趣（例如2015年）。那么，如何使用NA替换data.frame中包含grepl和gsub的所有其他单元格（不包含关键字“2015”）。

Answer 1

使用grepl和逻辑索引：

> dat <- data.frame(a=c("2016", "2015"))
> dat
  a
1 2016
2 2015
> i <- grepl("2015", dat$a)
> dat$a[!i] <- NA
> dat
 a
1 <NA>
2 2015

如果您真的需要，也可以添加gsub ..