Question

假设我有一个列联表（使用R中的table函数制成）。

             digit
ID         1  2  3  4  5  6  7  8  9
  1672120 23 16  8 10 12 13  3  3  5
  1672121  2  1  0  0  0  0  1  0  0
  1672122  1  2  1  0  1  0  0  1  0
  1672123  0  1  1  0  0  0  0  0  0
  1672124  1  1  0  1  1  0  0  0  0
  1672125  5  2  5  1  1  1  0  0  2
  1672127  2  1  2  1  0  0  0  0  0
  1672128  2  0  0  1  0  1  0  0  1
  1672129  1  0  1  0  0  0  1  0  0

如果我要从列联表中删除计数少于5的行，该怎么办？

Answer 1

由于您没有提供可重复的样本数据，因此以下示例基于mtcars数据集

让我们创建一个mtcars$gear与mtcars$carb的计数表

tbl <- table(mtcars$gear, mtcars$carb)
#
#    1 2 3 4 6 8
#  3 3 4 3 5 0 0
#  4 4 4 0 4 0 0
#  5 0 2 0 1 1 1

然后我们仅选择至少一个计数大于2的那些行

tbl[apply(tbl > 2, 1, any), ]
#
#    1 2 3 4 6 8
#  3 3 4 3 5 0 0
#  4 4 4 0 4 0 0

如何在R中的列联表中删除行？

1 个答案: