ben-domingue / irw

Code related to data for the Item Response Warehouse
https://datapages.github.io/irw/
4 stars 7 forks source link

Create Bifactor_Approach_Subscore_Assessment.Rdata #68

Closed rn2407stanford closed 2 months ago

rn2407stanford commented 2 months ago

x<-read.csv("SQLI_Example.csv", na = "NA") id<-1:nrow(x) L<-list() for (i in 1:ncol(x)) L[[i]]<-data.frame(id=id,item=names(x)[i],resp=x[,i]) df<-data.frame(do.call("rbind",L)) save(df,file="Bifactor_Approach_Subscore_Assessment.Rdata")