mirt包R：如何使用multigroup函数创建独立模型

编程问答 2022-08-13

问题描述


我在R中使用multipleGroup()函数时遇到了一些问题，我真的希望有人能为我提供帮助。
我想首先创建一个独立的，不受约束的模型 strong>，这两个组的所有参数可能都不同，但是我收到以下错误消息：

错误：如果没有适当的约束，将无法识别多组模型（组包含缺失的数据模式，其中项目响应已被完全省略，或者每个组中的类别数不等于项目总数类别）

在下面，您将看到一个示例代码（也适用于多数据），并且可以正常运行，并且进一步显示了我的代码和有关数据的一些信息。 我看不到代码中缺少什么... 有人可以给我一些小费吗？

以下是示例代码：

lsat <- expand.table(LSAT7)
set.seed(1234)
group <- sample(c('group.1','group.2'),1000,replace=TRUE)
xtabs(~group)

mod <- multipleGroup(lsat,model=1,group=group)

我的代码产生上述错误消息，是这样的：

Tdata <- import(here::here("test_data.xlsx"))
group <- c(rep('group1',25),rep('group2',25))
xtabs(~group)
Tdata <- Tdata %>% dplyr::select(item1,item2,item3,item4,item5)

multipleGroup(Tdata,model = 1,group = group)

向您显示有关我的数据的详细信息：

> head(Tdata)
  item1 item2 item3 item4 item5
1     1     2     1     2     1
2     2     2     1     2     3
3     3     4     3     3     3
4     3     4     5     4     5
5     2     1     2     1     2
6     2     2     1     2     2

> summary(Tdata)
     item1          item2          item3          item4          item5    
 Min.   :1.00   Min.   :1.00   Min.   :1.00   Min.   :1.00   Min.   :1.0  
 1st Qu.:2.00   1st Qu.:2.00   1st Qu.:2.00   1st Qu.:2.00   1st Qu.:2.0  
 Median :2.00   Median :3.00   Median :3.00   Median :3.00   Median :3.0  
 Mean   :2.70   Mean   :2.88   Mean   :2.82   Mean   :2.92   Mean   :2.9  
 3rd Qu.:3.75   3rd Qu.:4.00   3rd Qu.:4.00   3rd Qu.:4.00   3rd Qu.:4.0  
 Max.   :5.00   Max.   :5.00   Max.   :5.00   Max.   :5.00   Max.   :5.0  

> class(Tdata)
[1] "data.frame"

> class(Tdata$item1)
[1] "numeric"

> any(is.na(Tdata))
[1] FALSE

让我知道您是否需要其他信息。提前非常感谢您！

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

invariancemeasurementrr