# NOT RUN {
data(data_sim_Rasch)
Y <- data_sim_Rasch[,1]
X <- data_sim_Rasch[,-1]
Xnew <- data.frame("x1"=c(0,1),"x2"=c(-1.1,2.5),"x3"=c(1,0),"x4"=c(-0.2,0.7))
# }
# NOT RUN {
mod <- DIFtree(Y=Y,X=X,model="Logistic",type="udif",alpha=0.05,nperm=1000,trace=TRUE)
predict(mod,item=1,Xnew)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab