3

我有几个数据框，我想删除与某个字符串匹配的每一行。我使用以下代码来做到这一点：

 df[!(regexpr("abc", df$V4) ==1),]

如何删除后面的行，例如，如果我删除上面代码指定的第 n 行，我怎样才能另外删除第 n+1 行？

我的第一次尝试是简单地找出所需行的索引，但这不起作用，因为我需要删除不同数据帧中长度不同的行。所以指数不一样。

谢谢！

4

3 回答 3

1

我建议直接取出并操作逻辑向量。假设我们有向量：

x = c(5,0,1, 4, 3)

我们想做：

x[x > 3]

首先，请注意：

R> (s_n = x>3)
[1]  TRUE FALSE FALSE  TRUE FALSE

所以

R> (s_n1 = as.logical(s_n + c(F, l[1:(length(s_n)-1)])))
[1]  TRUE  TRUE FALSE  TRUE  TRUE

因此，

x[s_n1]

给你你想要的。

在您的特定示例中，例如：

s_n = !(regexpr("abc", df$V4) == 1)
s_n1 = as.logical(s_n + c(F, l[1:(length(s_n)-1)])))
df[s_n1, ]

应该管用。

于 2012-06-13T12:26:43.220 回答
0

在您的逻辑表达式上使用 which() ，然后您可以将 1 添加到结果中。

sel <- which(grep("abc", df$V4))
sel <- c(sel, sel+1)
df[-sel,]
于 2012-06-13T14:45:10.510 回答
0 
df[which(!(regexpr("abc", df$V4) ==1))+c(0,1),]
于 2012-06-13T15:06:35.167 回答