R-bin非数值

我知道我可以使用剪切到存储箱的数值。我想存储非数值。考虑这个数据框：

color <- c("Red","Blue","Green","Gray","Black")
dataframe <- data.frame(id,color)

---

我可以创建一个函数并调用lappy。是否有一个预先构建的函数已经为我完成了这项工作，我只需传入条件表达式？

这里有一种方法可以将值映射到新的、已装箱的值

color <- c("Red","Blue","Green","Gray","Black")
dataframe <- data.frame(id = 1:5, color)

library(plyr)

dataframe$Group <- mapvalues(dataframe$color, from = c("Red","Blue","Green","Gray","Black"), 
                                              to = c("R", "B", "G", "G", "B"))

  id color Group
1  1   Red     R
2  2  Blue     B
3  3 Green     G
4  4  Gray     G
5  5 Black     B

color
dataframe$Group
color <- c("Red","Blue","Green","Gray","Black")
dataframe <- data.frame(id = 1:5, color)

library(plyr)

dataframe$Group <- mapvalues(dataframe$color, from = c("Red","Blue","Green","Gray","Black"), 
                                              to = c("R", "B", "G", "G", "B"))

  id color Group
1  1   Red     R
2  2  Blue     B
3  3 Green     G
4  4  Gray     G
5  5 Black     B