https://github.com/cran/robCompositions
Tip revision: 70b4fa6067bde4e490c102c017ec89d6bf2408c4 authored by Matthias Templ on 08 May 2009, 11:22:02 UTC
version 1.2.2
version 1.2.2
Tip revision: 70b4fa6
summary.adtestWrapper.R
summary.adtestWrapper=function(object,...){
d=data.frame(ilrVars=unlist(object$info),
testName=unlist(lapply(object$res,function(x) x$method)),
testStat=unlist(lapply(object$res,function(x) x$statistic)),
pvalue=unlist(lapply(object$res,function(x) x$p.value)),
#alpha=object$alpha,
check=object$check)
#d=lapply(res,function(x) x$info)
string <- paste("Anderson-Darling test results ( alpha =", object$alpha, "):")
string2 <- paste("--> p-values and tests are obtained from", object$est, "estimates.")
cat("\n -----------------------------------------------")
cat("\n ", string)
cat("\n ----------------\n")
print(d)
cat("\n -----------------------------------------------\n")
cat("\n ", string2)
cat("\n")
invisible(d)
}