如何删除数据帧中的行?

我有一个名为“mydata”的数据帧，它看起来像这样:

   A  B  C   D 
1. 5  4  4   4 
2. 5  4  4   4 
3. 5  4  4   4 
4. 5  4  4   4 
5. 5  4  4   4 
6. 5  4  4   4 
7. 5  4  4   4

我想删除第2行，第4行，第6行。例如，像这样:

   A  B  C   D
1. 5  4  4  4 
3. 5  4  4  4 
5. 5  4  4  4 
7. 5  4  4  4

当前回答

简化顺序:

mydata[-(1:3 * 2), ]

顺序如下:

mydata[seq(1, nrow(mydata), by = 2) , ]

由负序排列:

mydata[-seq(2, nrow(mydata), by = 2) , ]

或者如果你想通过选择奇数来子集:

mydata[which(1:nrow(mydata) %% 2 == 1) , ]

或者如果你想通过选择奇数来子集，版本2:

mydata[which(1:nrow(mydata) %% 2 != 0) , ]

或者如果你想通过过滤偶数来子集:

mydata[!which(1:nrow(mydata) %% 2 == 0) , ]

或者如果你想通过过滤偶数来子集，版本2:

mydata[!which(1:nrow(mydata) %% 2 != 1) , ]

其他回答

为了完整起见，我将补充说，这也可以用dplyr使用slice来完成。使用它的好处是它可以成为管道工作流的一部分。

df <- df %>%
  .
  .
  slice(-c(2, 4, 6)) %>%
  .
  .

当然，您也可以在没有管道的情况下使用。

df <- slice(df, -c(2, 4, 6))

“非向量”格式，-c(2,4,6)表示获取不在第2,4,6行的所有内容。对于一个使用范围的例子，假设你想删除前5行，你可以使用slice(df, 6:n())。有关更多示例，请参阅文档。

从员工中删除Dan。data -不需要管理新的data.frame。

employee.data <- subset(employee.data, name!="Dan")

简化顺序:

mydata[-(1:3 * 2), ]

顺序如下:

mydata[seq(1, nrow(mydata), by = 2) , ]

由负序排列:

mydata[-seq(2, nrow(mydata), by = 2) , ]

或者如果你想通过选择奇数来子集:

mydata[which(1:nrow(mydata) %% 2 == 1) , ]

或者如果你想通过选择奇数来子集，版本2:

mydata[which(1:nrow(mydata) %% 2 != 0) , ]

或者如果你想通过过滤偶数来子集:

mydata[!which(1:nrow(mydata) %% 2 == 0) , ]

或者如果你想通过过滤偶数来子集，版本2:

mydata[!which(1:nrow(mydata) %% 2 != 1) , ]

用名字来识别:

调用唯一ID并识别数据帧(DF)中的位置。标记删除。如果唯一ID应用于多个行，则所有这些行都将被删除。

代码:

Rows<-which(grepl("unique ID", DF$Column))
DF2<-DF[-c(Rows),]
DF2

关键思想是，你把想要删除的行组成一个集合，并保留这个集合的补项。

在R中，集合的补由'-'操作符给出。

假设data。frame是myData:

myData[-c(2, 4, 6), ]   # notice the -

当然，如果您想完全删除这些行，不要忘记“重新分配”myData——否则，R只打印结果。

myData <- myData[-c(2, 4, 6), ]

推荐文章