I am running a Graded Response Model using the Mirt package for IRT. This is the code:
library(readxl) library(dplyr) library(haven) dat<-read_sav("R/