我有几个数据框，我想删除与某个字符串匹配的每一行。我使用以下代码来做到这一点：
df[!(regexpr("abc", df$V4) ==1),]
如何删除后面的行，例如，如果我删除上面代码指定的第 n 行，我怎样才能另外删除第 n+1 行？
我的第一次尝试是简单地找出所需行的索引，但这不起作用，因为我需要删除不同数据帧中长度不同的行。所以指数不一样。
谢谢！
问问题
230 次
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 回答