R/m4plNoMoreSummary.r

`m4plNoMoreSummary` <-
function(x){
 stat1 <- sapply(x, mean, na.rm=TRUE) ##
 stat2 <- sapply(x, sd,   na.rm=TRUE) ##
 res <- data.frame(t(data.frame(mean=stat1,sd=stat2)))
 return(res)
 }

Try the irtProb package in your browser

Any scripts or data that you put into this service are public.

irtProb documentation built on May 2, 2019, 1:30 p.m.