powered by
F.maximize.g( fit )
F.dfunc.estim
fit
# Fake data set.seed(22223333) x <- rgamma(100, 10, 1) fit <- F.dfunc.estim( x, likelihood="Gamma", x.scl="max" ) F.maximize.g( fit ) # should be near 10. fit$x.scl # same thing
Run the code above in your browser using DataLab