使用R中的grep从data.frame中删除行

Ann*_*rie 11 grep row r dataframe

我有一个像这样的数据帧:

    d <- data.frame(cbind(x=1, y=1:10,    z=c("apple","pear","banana","A","B","C","D","E","F","G")), stringsAsFactors = FALSE)
Run Code Online (Sandbox Code Playgroud)

我想从这个数据框中删除一些行,具体取决于列z的内容:

    new_d <- d[-grep("D",d$z),]
Run Code Online (Sandbox Code Playgroud)

这很好用; 第7行现已删除:

    new_d
     x  y      z
  1  1  1  apple
  2  1  2   pear
  3  1  3 banana
  4  1  4      A
  5  1  5      B
  6  1  6      C
  8  1  8      E
  9  1  9      F
  10 1 10      G
Run Code Online (Sandbox Code Playgroud)

但是,当我使用grep搜索列z中不存在的内容时,它似乎删除了数据帧的所有内容:

    new_d <- d[-grep("K",d$z),]
    new_d
    [1] x y z
    <0 rows> (or 0-length row.names)
Run Code Online (Sandbox Code Playgroud)

我想以这种或其他方式搜索和删除行,即使我搜索的字符串不存在.怎么去这个?

GSe*_*See 20

您可以使用TRUE/FALSE子集而不是数字.

grepl就像grep,但它返回一个logical向量.否定与它一起工作.

 d[!grepl("K",d$z),]
   x  y      z
1  1  1  apple
2  1  2   pear
3  1  3 banana
4  1  4      A
5  1  5      B
6  1  6      C
7  1  7      D
8  1  8      E
9  1  9      F
10 1 10      G
Run Code Online (Sandbox Code Playgroud)


Ari*_*man 7

这是你的问题:

> grep("K",c("apple","pear","banana","A","B","C","D","E","F","G"))
integer(0)
Run Code Online (Sandbox Code Playgroud)

尝试grepl()代替:

d[!grepl("K",d$z),]
Run Code Online (Sandbox Code Playgroud)

这是有效的,因为否定的逻辑向量为每一行都有一个条目:

> grepl("K",d$z)
 [1] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
> !grepl("K",d$z)
 [1] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
Run Code Online (Sandbox Code Playgroud)