Returns the empirical parameter estimate for a distribution
Examples
# Normal distribution
sampNorm <- rtrunc(50, mean = 5, sd = 2)
empiricalParameters(sampNorm)
#> mean sd
#> 5.473322 2.024155
#> attr(,"class")
#> [1] "parms_normal"
# Poisson distribution
sampPois <- rtrunc(10, lambda = 100, family = "Poisson")
empiricalParameters(sampPois)
#> lambda
#> 102.6
#> attr(,"class")
#> [1] "parms_poisson"