Estoy tratando de usar el comando mle2
, en el paquete bbmle
. Estoy mirando la p2 de "Estimación de máxima verosimilitud y análisis con el paquete bbmle
" de Bolker. De alguna manera, no puedo ingresar los valores correctos de inicio. Aquí está el código reproducibles:intervalos de confianza de perfil en R: mle2
l.lik.probit <-function(par, ivs, dv){
Y <- as.matrix(dv)
X <- as.matrix(ivs)
K <-ncol(X)
b <- as.matrix(par[1:K])
phi <- pnorm(X %*% b)
sum(Y * log(phi) + (1 - Y) * log(1 - phi))
}
n=200
set.seed(1000)
x1 <- rnorm(n)
x2 <- rnorm(n)
x3 <- rnorm(n)
x4 <- rnorm(n)
latentz<- 1 + 2.0 * x1 + 3.0 * x2 + 5.0 * x3 + 8.0 * x4 + rnorm(n,0,5)
y <- latentz
y[latentz < 1] <- 0
y[latentz >=1] <- 1
x <- cbind(1,x1,x2,x3,x4)
values.start <-c(1,1,1,1,1)
foo2<-mle2(l.lik.probit, start=list(dv=0,ivs=values.start),method="BFGS",optimizer="optim", data=list(Y=y,X=x))
y este es el error que consigo:
Error in mle2(l.lik.probit, start = list(Y = 0, X = values.start), method = "BFGS", :
some named arguments in 'start' are not arguments to the specified log-likelihood function
Cualquier idea de por qué? ¡Gracias por tu ayuda!
'values.start' no está especificado. Tienes que definirlo. También hay un error tipográfico en 'foo2 << -'. –
¡Gracias por la respuesta rápida! Hice esos cambios (mis valores iniciales son values.start <-c (1,1,1,1,1)), pero sigo recibiendo el mismo mensaje de error. Creo que hay una incongruencia entre el comando mle2 y la función que especifiqué, ¡pero no puedo entenderlo por mi vida! – EOM
¿Está implementando una [regresión probit] (http://www.ats.ucla.edu/stat/R/dae/probit.htm)? –