C'è la fitdistr
funzione nel pacchetto MASS o alcune delle funzioni nel pacchetto fitdistrplus . Ecco alcuni esempi di quest'ultimo.
require(fitdistrplus)
set.seed(1)
dat <- rnorm(50,0,1)
f1 <- fitdist(dat,"norm")
f2 <- fitdist(dat,"logis")
f3 <- fitdist(dat,"cauchy")
quindi per esempio
> f1
Fitting of the distribution ' norm ' by maximum likelihood
Parameters:
estimate Std. Error
mean 0.1004483 0.11639515
sd 0.8230380 0.08230325
e puoi vedere le trame con
plotdist(dat,"norm",para=list(mean=f1$estimate[1],sd=f1$estimate[2]))
plotdist(dat,"logis",para=list(location=f2$estimate[1],scale=f2$estimate[2]))
plotdist(dat,"cauchy",para=list(location=f3$estimate[1],scale=f3$estimate[2]))
quindi sembra plausibile come una distribuzione normale
ma forse anche come distribuzione logistica (avrai bisogno di un campione più ampio per distinguerli nelle code)
sebbene con un qqplot e guardando il CDF si può dire che questa probabilmente non è una distribuzione di Cauchy