Как я могу извлечь данные из mcmc RJAGS

Я использую следующую модель, где я получал результаты измерений для каждой недели голосования. Который производит более 100 альфа-векторов для каждой партии. Может быть, вопрос в том, как я мог бы накапливать их так, чтобы я мог нарисовать линейный график?

model{
  ## measurement 
 for(i in 1:NPOLLS){  
      p1[i] ~ dnorm(alpha1[WoY[i]] + pollster1[org[i]], prec1[i])
       p2[i] ~ dnorm(alpha2[WoY[i]] + pollster2[org[i]], prec2[i])
       p3[i] ~ dnorm(alpha3[WoY[i]] + pollster3[org[i]], prec3[i])

}

## transition 
for(i in 2:NPERIODS){    
    alpha1[i] ~ dnorm(alpha1[i-1],phi1)
    alpha2[i] ~ dnorm(alpha2[i-1],phi2)
    alpha3[i] ~ dnorm(alpha3[i-1],phi3)
 }

pollster1[1] <- -sum(pollster1[2:NPOLLSTERS])
pollster2[1] <- -sum(pollster2[2:NPOLLSTERS])
pollster3[1] <- -sum(pollster3[2:NPOLLSTERS])

## priors
phi1 ~ dgamma(5000,1)     
alpha1[1] ~ dunif(.2,.4) 
phi2 ~ dgamma(5000,1)     
alpha2[1] ~ dunif(.2,.4)
phi3 ~ dgamma(10000,1)     
alpha3[1] ~ dunif(.1,.3)
    for(i in 2:NPOLLSTERS){
    pollster1[i] ~ dnorm(0,.01);    
    pollster2[i] ~ dnorm(0,.01);
    pollster3[i] ~ dnorm(0,.01);
 } }

1 ответ

Функция jags обеспечивает объект mmcm.list с summary универсальная функция для этого класса объекта. использование str а также name функции вашего нового объекта возвращаются jags функция, и вам нужно найти что-то вроде mcmc, mcmcподобъект представляет собой матрицу класса mcmc.list содержащие постеры с n rowколичество итераций и n col оценочные параметры. Таким образом, вы можете извлечь то, что вы хотите. Длина mcmc Объект равен количеству цепочек. У них также есть общий plot.mcmmcфункция рисовать заднюю плотность.

Другие вопросы по тегам