Diferenças

Aqui você vê as diferenças entre duas revisões dessa página.

Link para esta página de comparações

Ambos lados da revisão anteriorRevisão anterior
Próxima revisão
Revisão anterior
cursos:ruel:sessao3 [2007/12/18 01:16] paulojuscursos:ruel:sessao3 [2007/12/18 01:19] (atual) paulojus
Linha 10: Linha 10:
  
 **Conteúdo de óleo de //S. linicola//, em percentagem, em vários estágios de crescimento (Steel \& Torrie, 1980, p.199).** **Conteúdo de óleo de //S. linicola//, em percentagem, em vários estágios de crescimento (Steel \& Torrie, 1980, p.199).**
-^Estágios ^ Blocos ^^ +^Estágios ^  Blocos ^^^^ 
 |                |             | II    |  III  |  IV | |                |             | II    |  III  |  IV |
 |Estágio 1             4,    | 5,9   | 6,0   | 4,1 | |Estágio 1             4,    | 5,9   | 6,0   | 4,1 |
Linha 71: Linha 71:
 </code> </code>
  
-Nos gráficos e resultados acima procuramos captar os principais aspectos dos dados bem como verificar se não há intera\c{c}ão entre blocos e tratamentos, o que não deve acontecer neste tipo de experimento.+Nos gráficos e resultados acima procuramos captar os principais aspectos dos dados bem como verificar se não há interação entre blocos e tratamentos, o que não deve acontecer neste tipo de experimento.
  
 A seguir vamos ajustar o modelo e obter outros resultados, incluindo a análise de resíduos e testes para verificar a validades dos pressupostos do modelo. A seguir vamos ajustar o modelo e obter outros resultados, incluindo a análise de resíduos e testes para verificar a validades dos pressupostos do modelo.
Linha 102: Linha 102:
 qqline(residuos) qqline(residuos)
 title("Grafico Normal de \n Probabilidade dos Resíduos") title("Grafico Normal de \n Probabilidade dos Resíduos")
 +</code>
  
-## teste para normalidade+Teste para normalidade 
 +<code R>
 shapiro.test(residuos) shapiro.test(residuos)
- +</code> 
-## Testando a não aditividade +Testando a não aditividade: 
-## primeiro vamos extrair coeficientes de tratamentos e blocos+Primeiro vamos extrair coeficientes de tratamentos e blocos 
 +<code R>
 ex02.av$coeff ex02.av$coeff
 bl <- c(0, ex02.av$coeff[2:4]) bl <- c(0, ex02.av$coeff[2:4])
Linha 113: Linha 116:
 bl bl
 tr tr
 +</code>
  
-## agora criar um novo termo e testar sua significancia na ANOVA+agora criar um novo termo e testar sua significancia na ANOVA 
 +<code R>
 bltr <- rep(bl, 6) * rep(tr, rep(4,6)) bltr <- rep(bl, 6) * rep(tr, rep(4,6))
  

QR Code
QR Code cursos:ruel:sessao3 (generated for current page)