用计数重塑数据[重复]

Question

这个问题在这里已经有答案了:

计算频率和从长到宽投射的更快方法 (4 个回答)

关闭 去年.

我有一个数据集，我想使用 R 中的包 reshape2 来重塑它，但我收到此错误：

Aggregation function missing: defaulting to length

这是我的数据的 head() ：

cat_one customer valor
cama        A     1
cama        B     1
cama        C     1
mesa        D     1
mesa        A     1
mesa        A     1

我想像这样重塑它，并在两个变量之间进行计数：

customer     cama    mesa
A             1       0
B             2      ...
C
D            ...     ...

这是我的代码：

dcast(dados_teste, cat_one ~ customer, value.var = 'valor')

我正在关注另一个 问题, ，但同样的解决方案对我不起作用。

Answer 1

您混淆了公式的左侧和右侧。

尝试：

library(reshape2)
dcast(dados_teste, customer ~ cat_one, value.var = "valor")
# Aggregation function missing: defaulting to length
#   customer cama mesa
# 1        A    1    2
# 2        B    1    0
# 3        C    1    0
# 4        D    0    1

您提到的“错误”实际上只是一个 warning 这告诉您它只是计算值的数量，而不应用任何其他函数。所以，在这种情况下，这是完全可以接受的。

如果您想删除它，请指定 fun.aggregate = length.

dcast(dados_teste, customer ~ cat_one, 
      value.var = "valor", fun.aggregate = length)

---

如果它只计算您所追求的两列，您也可以看看 table:

as.data.frame.matrix(table(dados_teste[c(2, 1)]))
#   cama mesa
# A    1    2
# B    1    0
# C    1    0
# D    0    1