Não foi possível enviar o arquivo. Será algum problema com as permissões?
Diferenças
Aqui você vê as diferenças entre duas revisões dessa página.
Ambos lados da revisão anterior Revisão anterior Próxima revisão | Revisão anterior Próxima revisão Ambos lados da revisão seguinte | ||
disciplinas:ce227-2016-01:historico [2016/05/18 09:38] paulojus |
disciplinas:ce227-2016-01:historico [2016/05/18 09:48] paulojus |
||
---|---|---|---|
Linha 265: | Linha 265: | ||
sqrt(1/fit.inla$summary.hyperpar[,1]) | sqrt(1/fit.inla$summary.hyperpar[,1]) | ||
</code> | </code> | ||
- | Ajustar o modelo acima aos dados de:\\ | ||
- | Julio M. Singer Carmen Diva Saldiva de André Clóvis de Araújo Peres\\ | ||
- | **Confiabilidade e Precisão na Estimação de Médias**\\ | ||
- | [[http://www.rbes.ibge.gov.br/images/doc/rbe_236_jan_jun2012.pdf|Revista Brasileira de Estatística, v73]], n. 236, jan./jun. 2012. | ||
+ | <fs large>**Atividades propostas:**</fs> | ||
+ | - Complementar as análise acima com exploração dos resultados, obtenção de gráficos e resultados de interesse | ||
+ | - Ajustar o modelo acima aos dados de:\\ Julio M. Singer, Carmen Diva Saldiva de André, Clóvis de Araújo Peres\\ **Confiabilidade e Precisão na Estimação de Médias**\\ [[http://www.rbes.ibge.gov.br/images/doc/rbe_236_jan_jun2012.pdf|Revista Brasileira de Estatística, v73]], n. 236, jan./jun. 2012. | ||
+ | - Identificar e ajustar modelos (não bayesianos, bayesianos por simulação ou aproximados) para dados simulados da seguinte forma: <code R> | ||
+ | set.seed(123456L) | ||
+ | n <- 50 | ||
+ | m <- 10 | ||
+ | w <- rnorm(n, sd=1/3) | ||
+ | u <- rnorm(m, sd=1/4) | ||
+ | b0 <- 0 | ||
+ | b1 <- 1 | ||
+ | idx <- sample(1:m, n, replace=TRUE) | ||
+ | y <- rpois(n, lambda = exp(b0 + b1 * w + u[idx] | ||
+ | </code> | ||
+ |