一、处理数据
按分数划分被试作答等级,一般2-5(具体理论再学)。
二、调用
library(openxlsx)
library(mirt)
my.data <- read.xlsx("C:/Users/11.xlsx")
my.data1 <- my.data[c("item2","item3","item4","item5",
"item6","item7")]
mirtModel3PL.11 <- mirt(my.raschat1,1,itemtype = 'DATA', technical=list(NA)) #itemtype = 'DATA',(这啥)
M2(mirtModel3PL.11)
coef(mirtModel3PL.11)
ability.11<-fscores(mirtModel3PL.11,method="EAP",full.scores.SE =F)
write.csv(coef,'coef.csv')