结合grepl和gsub以用NA取代不需要的细胞

Question

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

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。。