https://github.com/cran/robCompositions
Raw File
Tip revision: 165037e6629b3969bb2024b9b74bc0bc78b6e1c4 authored by Matthias Templ on 27 February 2013, 00:00:00 UTC
version 1.6.3
Tip revision: 165037e
print.adtestWrapper.R
print.adtestWrapper <- function(x,...){
	if(all(x$check)){
		print(paste("The data follow the normal distribution on the simplex (alpha =",x$alpha,")",sep=""))
	} else { 
		print(paste("The data do not follow the normal distribution on the simplex (alpha =",x$alpha,")",sep=""))
		#print(x$check)
}
}
back to top