r - 对数字变量进行分箱

Question

我有一个向量 X，其中包含我想要合并/离散化的正数。对于这个向量，我希望数字 [0, 10) 像它们存在于向量中一样显示，但数字 [10,∞) 是 10+。

我正在使用:

x <- c(0,1,3,4,2,4,2,5,43,432,34,2,34,2,342,3,4,2)
binned.x <- as.factor(ifelse(x > 10,"10+",x))

但这对我来说感觉很糟糕。有谁知道更好的解决方案或不同的方法？

Answer 1

怎么样cut :

binned.x <- cut(x, breaks = c(-1:9, Inf), labels = c(as.character(0:9), '10+'))

其中产生:

 # [1] 0   1   3   4   2   4   2   5   10+ 10+ 10+ 2   10+ 2   10+ 3   4   2  
 # Levels: 0 1 2 3 4 5 6 7 8 9 10+