R在使用cut()函数合并后填充空单元格

Question

我正在使用 cut() 函数对向量整数进行分箱。该过程运行良好，并提供落入每个箱子的整数数量，但是对于没有数字的箱子，它没有列出。我想填写这些，这样每个箱子都有一个单元格，对于没有数字的箱子，它用 0 填充它们。例如:

set.seed(123)
x <- sample(1:3, 100, replace = TRUE) 
bins <- cut(x, breaks = 4, labels =FALSE)
bins_tab <- table(bins)
bins_tab

这给出:

bins
 1  3  4 
33 34 33

我想用 0 填充 2，这样输出是:

 bins
 1  2  3  4 
33  0 34 33

感谢任何帮助。

Answer 1

像这样？

table( cut( x , breaks = 4 , labels = 1:4 ) )

# 1  2  3  4 
#33  0 34 33 

即确保有空因子水平的标签。