根據條件刪除特定列

我在R中有一個數據集，其中有一列指出任務上的錯誤：0 =沒有錯誤。 1 =錯誤。根據條件刪除特定列

如何刪除錯誤列顯示1（對於錯誤）和後續行（即使它是0）的行？

例子：

id part block response  time wrong 
1 1 1  1  307 2015-04-26  0 
2 2 1  1  291 2015-05-03  1 
3 3 1  1  310 2015-05-10  0

如何刪除行2和3？

乾杯！

2015-04-26 Colin

你可以這樣做：

library(dplyr) 
df %>% filter(!(wrong == 1 | lag(wrong == 1, default = F)))

2015-04-26 04:05:20

這是驚人的！非常感謝！我會爲我的無知道歉，但是如何保存過濾的數據集以進一步分析？ – Colin

很高興幫助。如果它回答您的問題，請考慮點擊左側的複選標記。爲了將結果保存在一個變量中，你可以做'df2 <- df %>％filter（！（錯誤== 1 | lag（錯誤== 1，default = F）））'，然後在需要時簡單地調用'df2'。 –

考慮它檢查。再次感謝你！ – Colin

開始通過使樣本數據集：

df <- data.frame(id=1:10, error=sample(0:1, size = 10, replace = T, prob = c(0.7,0.3)))

找到行的行號標記錯誤，並隨後線，不論其錯誤狀態。
```
to_remove <- c(which(df$error == 1), which(df$error == 1)+1) 
```

確保行號不大於df中的行數。

to_remove <- to_remove[!(to_remove>nrow(df))]

2015-04-26 02:44:02 enterenter

回答