R/SSI.default.R

In wasabi1989/MiscPsycho: Miscellaneous Psychometric Analyses

Defines functions SSI.default

Documented in SSI.default

SSI.default <-
function(mf, y, k, ...){
	result <- SSI.fit(mf, y, k)
	result$call <- match.call()
	class(result) <- "SSI"
	result
}