Question

我有一个大型数据框，其中包含许多我想要清理的字符串值。

示例：

    students <- data.frame(name = c("John", "Jerry", "Bill", "Tom", "Mary", "Bill"),
                       class = c("A", "B", "-", "#NA", "A", "low"), stringsAsFactors = FALSE)

我希望每个不在A，B或C级的学生都被设置为D. 我目前的解决方案是：

'%!in%' <- function(x,y)!('%in%'(x,y))
for(i in 1:nrow(students)) {
  if(students$class[i] %!in% c("A", "B", "C")) {
    students$class[i] <- "D"
  }
}

有没有比这更好的解决方案，最好使用滚边，因为有很多这样的列？

谢谢！

Answer 1

我们可以在没有循环的情况下执行此操作，因为赋值是向量化的

students$class[students$class %!in% c("A", "B", "C")] <- "D"
students
#   name class
#1  John     A
#2 Jerry     B
#3  Bill     D
#4   Tom     D
#5  Mary     A
#6  Bill     D

条件数据帧突变

1 个答案: