Question

我正在尝试使用reshape2包将一些数据从long转换为宽，但是我收到的错误是我无法解决的。在下面的示例中，我创建了一些与我的真实数据类似的虚假数据。我想将每个“subj”转换为一个列，该列包含该主题中给定“ID”号码的所有“信用”的总和。

library(reshape2)

＃创建虚假数据并将其转换为数据框

ID = rep(c(100,101,102,103), each=5)  
subj = rep(c("CHEM","ENGL","HIST","MATH"), 5)  
credits = rep(3, 20)  
df = data.frame(ID, subj, credits)

＃从long转换为wide，将“subj”的值作为新列＃和“credit”之和作为每个“subj”的值

df.wide = dcast(df, ID ~ subj, value.var=credits, fun.aggregate=sum)

这是我在运行dcast命令时想要获得的内容：

ID    CHEM    ENGL    HIST    MATH  
100     6       3       3      3  
101     3       6       3      3  
[and so on for each value of ID]

这是我在运行上面的代码时实际得到的错误：

Error in .subset2(x, i, exact = exact) : 
recursive indexing failed at level 2

如果我从dcast调用中删除“fun.aggregate = sum”，我会收到同样的错误。

另外，如果我使用sample（）函数（而不是rep（））创建“credits”的值，并调用dcast（没有fun.aggregate = sum），我会收到以下错误：

Error in .subset2(x, i, exact = exact) : 
no such index at level 1

据我所知，在没有问题的情况下运行类似的dcast命令。当我看到解决方案的时候，我猜我打算拍打额头并大喊“doh”，但我被卡住了。

Answer 1

只需将信用放在引号中：

df.wide = dcast(df, ID ~ subj, value.var="credits", fun.aggregate=sum)
df.wide
   ID CHEM ENGL HIST MATH
1 100    6    3    3    3
2 101    3    6    3    3
3 102    3    3    6    3
4 103    3    3    3    6

如何用R中的reshape2包解决dcast错误？

1 个答案: