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 | ||
|
pessoais:walmes:cursorufgd [2011/04/30 02:26] walmes [section 8] |
pessoais:walmes:cursorufgd [2012/04/03 22:14] (atual) walmes [section 16] |
||
|---|---|---|---|
| Linha 285: | Linha 285: | ||
| ---- | ---- | ||
| + | ==== Seminário sobre modelos de regressão ==== | ||
| + | |||
| + | [[http://www.leg.ufpr.br/~walmes/docs/modelos-regressao-walmes.pdf|{{ :pessoais:walmes:mod-reg.png?200|}}]] Slides do seminário {{http://www.leg.ufpr.br/~walmes/docs/modelos-regressao-walmes.pdf|Modelos de regressão: teoria e aplicação nas ciências agrárias}} oferecido aos acadêmicos do grupo PET-Agronomia e PET-Zootecnia (12:00-13:00h, 29/04/2011, FCA/UFGD). O seminário abordou aspectos históricos, cotidianos, apresentou as classes de modelos, técnicas de estimação, interpretação dos modelos, escolha do modelo, e apresentou 4 aplicações de modelos de regressão em ciências agrárias. | ||
| + | |||
| + | ---- | ||
| ==== Pacotes necessários a serem instalados ==== | ==== Pacotes necessários a serem instalados ==== | ||
| Linha 368: | Linha 373: | ||
| quadro <- cbind(FV=rownames(anova(m1)), GL=anova(m1)[,"Df"], QMR) | quadro <- cbind(FV=rownames(anova(m1)), GL=anova(m1)[,"Df"], QMR) | ||
| write.table(quadro, file="resumoanova.xls", quote=FALSE, row.names=FALSE, sep="\t") | write.table(quadro, file="resumoanova.xls", quote=FALSE, row.names=FALSE, sep="\t") | ||
| - | </code> | ||
| + | require(agricolae) | ||
| + | |||
| + | # aplica o teste de Tukey (aqui só para efeito principal de potássio) | ||
| + | # em caso de interação o procedimento é outro | ||
| + | tukey <- lapply(ajustes, | ||
| + | function(a){ | ||
| + | qmr <- anova(a)[,"Mean Sq"] | ||
| + | dfr <- anova(a)[,"Df"] | ||
| + | da <- a$model | ||
| + | t0 <- with(da, HSD.test(r, potassio, dfr, qmr)) | ||
| + | return(t0) | ||
| + | }) | ||
| + | </code> | ||
| ==== Lista de afazeres ==== | ==== Lista de afazeres ==== | ||
| Linha 397: | Linha 414: | ||
| * fazer uma enquete para avaliar a qualidade do curso. | * fazer uma enquete para avaliar a qualidade do curso. | ||
| </note> | </note> | ||
| + | |||
| + | * {{http://designcomputing.net/gendex/alpha/|ALPHA: Program for Constructing α-designs}}; | ||
| + | * {{http://cropscience.ch/?p=368|Field designs for replicated trials}}; | ||
| + | * {{http://www.stat.ncsu.edu/people/dickey/courses/st711/notes/Notes_pdf/Alpha%20Lattice%20designs.pdf|Alpha Lattice Designs}}; | ||
| ---- | ---- | ||
