library(fitur)
x <- rgamma(100, 1, 1)
fit <- fit_univariate(x, 'gamma')
ks_test(fit, x)

## 
##  One-sample Kolmogorov-Smirnov test
## 
## data:  x
## D = 0.082165, p-value = 0.5093
## alternative hypothesis: two-sided

ad_test(fit, x)

## 
##  Anderson-Darling test of goodness-of-fit
##  Null hypothesis: distribution 'distfun[[2]]'
## 
## data:  x
## An = 0.49058, p-value = 0.756

cvm_test(fit, x)

## 
##  Cramer-von Mises test of goodness-of-fit
##  Null hypothesis: distribution 'distfun[[2]]'
## 
## data:  x
## omega2 = 0.079325, p-value = 0.6968