Apply all goodness of fit tests and return a data.frame with the results

gof_tests(fits, x)

Arguments

fits

a list object produced from fit_univariate, fit_empirical, or fit_univariate_man

x

numeric vector of sample data

Value

a data.frame of test statistic results for each distribution

Examples

set.seed(84) x <- rgamma(100, 1, 1) dists <- c('gamma', 'lnorm', 'weibull') multipleFits <- lapply(dists, fit_univariate, x = x) gof_tests(multipleFits, x)
#> distribution ks_statistic ks_p_value ad_statistic ad_p_value cv_statistic #> 1 gamma 0.09148230 0.37259701 0.6894059 0.56735453 0.12941452 #> 2 lnorm 0.15167137 0.02008675 2.8709299 0.03193707 0.50728236 #> 3 weibull 0.07223744 0.67373787 0.4375504 0.81047531 0.07674045 #> cv_p_value #> 1 0.45953635 #> 2 0.03796115 #> 3 0.71201030