R/alpha.default.R

In wasabi1989/MiscPsycho: Miscellaneous Psychometric Analyses

Defines functions alpha.default

Documented in alpha.default

alpha.default <- function(dat, ...){
	result <- alpha.fit(dat, ...)
	result$call <- match.call()
	class(result) <- "alpha"
	result
	}