R/subjETSDIF.R

In KernSmoothIRT: Nonparametric Item Response Theory

Defines functions subjETSDIF

Documented in subjETSDIF

subjETSDIF <- function(x){

	ETSs <- list(length(x$DIF))
	
	for (i in 1:length(x$DIF)){
		ETSs[[i]] <- subjETS(x$DIF[[i]])
	}
	
	return(ETSs)
	
}

Try the KernSmoothIRT package in your browser