我正在尝试在grm软件包中运行ltm。我的脚本如下：
library (ltm)
library (msm)
library (polycor)
dim(data)
head(data)
str(data)
descript(data)
options(max.print=1000000)
rcor.test(data, method = "pearson")
data_2 <- data
data_2[] <- lapply(data_2, factor)
out <- grm(data_2)
out2 <- grm(data_2, constrained = TRUE)
anova(out2,out)
margins(out)
但是，当我运行margins(out)时，出现以下错误：Error in exp[ind] <- n * colSums(GHw * pp) : subscript out of bounds
有人可以解释一下吗？而我该如何解决呢？
我的问卷中有35项，有576名受访者。这是数据的示例（前6位响应者和前6位项目）。
pespd_qa1 pespd_qa2 pespd_qa3 pespd_qa4 pespd_qa5 pespd_qa6
1 9 5 7 4 1 3
2 5 0 9 6 0 8
3 5 3 5 6 3 5
4 7 5 4 3 1 1
5 2 3 0 0 0 0
6 10 1 8 2 2 5