对行使用重复标识符的点差

Question

我有一个长格式的数据框，其中包含相同日期和人的多个条目。

jj <- data.frame(month=rep(1:3,4),

             student=rep(c("Amy", "Bob"), each=6),

             A=c(9, 7, 6, 8, 6, 9, 3, 2, 1, 5, 6, 5),

             B=c(6, 7, 8, 5, 6, 7, 5, 4, 6, 3, 1, 5))

我想将其转换为宽格式并使其如下所示：

month Amy.A Bob.A Amy.B Bob.B

1     

2     

3

1

2

3

1

2

3

1

2

3

我的问题与此非常相似。我已经在答案中使用了给定的代码：

kk <- jj %>% 

  gather(variable, value, -(month:student)) %>% 

  unite(temp, student, variable) %>% 

  spread(temp, value)

但它给出以下错误：

错误：行（1、4），（2、5），（3、6），（13、16），（14、17），（15、18），（7、10），（8）的标识符重复，11），（9，12），（19，22），（20，23），（21，24）

提前致谢。注意：我不想删除多个条目。