R输出likert结果

Question

我使用likert软件包来处理likert量表中的数据。但我不知道如何在csv文件中输出likert表。

library(likert)
a<- rep(1:5, 10)
b<- rep(1:5, 10)
a<- factor(a)
b<- factor(b)
c<- data.frame(a, b)
scaledc<- likert(c)
write.table(aggScaled, file="~/DATA/scaledc.csv")

它给出了一个错误消息：

Error in as.data.frame.default(x[[i]], optional = TRUE, stringsAsFactors = stringsAsFactors) : 
  cannot coerce class ""likert"" to a data.frame

Answer 1

“谢谢，”弗莱克先生，我找到了正确的答案。该命令应是：

write.table(scaledc$results, file="~/DATA/scaledc.csv", sep = ",", row.names = F)