Existe la fitdistr
función en el paquete MASS o algunas de las funciones en el paquete fitdistrplus . Aquí hay algunos ejemplos de esto último.
require(fitdistrplus)
set.seed(1)
dat <- rnorm(50,0,1)
f1 <- fitdist(dat,"norm")
f2 <- fitdist(dat,"logis")
f3 <- fitdist(dat,"cauchy")
así por ejemplo
> f1
Fitting of the distribution ' norm ' by maximum likelihood
Parameters:
estimate Std. Error
mean 0.1004483 0.11639515
sd 0.8230380 0.08230325
y puedes ver las parcelas 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]))
entonces parece plausible como una distribución normal
pero también quizás como una distribución logística (necesitará una muestra más grande para distinguirlos en las colas)
aunque con un qqplot y mirando el CDF se puede decir que probablemente esta no sea una distribución de Cauchy