Intento ajustar un modelo bayesiano. Este modelo tiene muchos parámetros (unos 150).
Ejecuto MCMC (10000 iters) con un periodo de adelgazamiento para evitar el problema de la correlación y con la esperanza de que me ahorre algo de tiempo de cálculo. Así obtengo la muestra que me permite calcular las estimaciones de Monte Carlo. Sabía que una inferencia adecuada implica comprobar la convergencia MCMC. Llevo a cabo esta tarea con una evaluación gráfica (sé que hay enfoques más formales, este es un primer intento) con trace plot. Me di cuenta de que hay pocos parámetros que no muestran ninguna convergencia. ¿Qué significa esto?
Cuando intento ver cuál era el tamaño efectivo de la muestra, obtengo para estos parámetros valores muy bajos (como 6) y esto es señal de muestras correlacionadas.
No sé cómo seguir.
ACTUALIZACIÓN: Este es mi modelo en BUGS. Es una regresión dirichlet, con la variable de respuesta y compuesta por 4 categorías (por lo que K=4). Lo estoy aplicando a un conjunto de datos relacionados con los delitos violentos en el estado de EE.UU.. Así que mi idea era utilizar un parámetro beta para cada observación i (los estados en EE.UU.) Ejemplo de datos:
state violent_crime murder rape robbery aggravated_assault median_income
1 Alabama 20727 276 2005 4701 13745 42917
2 alaska 4684 41 771 629 3243 70898
Modelo:
model
{
for (i in 1:n) {
beta1[i,1:K]~dmnorm(zero[],t[1:K,1:K])
Y[i,1:K] ~ddirich(alpha[i,1:K])
for ( k in 1:4)
{
xb[i,k]<-exp(beta0[k]+beta1[i,k]*x[i])
}
for( k in 1:3)
{
mu[i,k]<-xb[i,k]/sum(xb[i,1:4])
}
mu[i,K]<-1/sum(xb[i,1:4])
for( k in 1:K)
{
alpha[i,k]<-mu[i,k]*phi
}
}
for(i in 1:K)
{
for (j in 1:K)
{ B[i,j] <- 0.00001*equals(i,j)
}}
#prior
beta0[1:K]~dmnorm(zero[],B[,])
for( k in 1:K)
{
zero[k] <- 0
}
#hyper-prior
t[1:K,1:K]~dwish(R[1:K,1:K],4)
phi~dgamma(0.0001,0.0001)
}