Diferenças
Aqui você vê as diferenças entre duas revisões dessa página.
| Ambos lados da revisão anteriorRevisão anteriorPróxima revisão | Revisão anterior | ||
| cursos:ruel:sessao0 [2007/12/19 17:29] – uel | cursos:ruel:sessao0 [2008/10/28 11:39] (atual) – paulojus | ||
|---|---|---|---|
| Linha 1: | Linha 1: | ||
| ====== Sessão Inicial -- Fundamentos da Linguagem R ====== | ====== Sessão Inicial -- Fundamentos da Linguagem R ====== | ||
| - | Ciando | + | Criando |
| <code R> | <code R> | ||
| getwd() | getwd() | ||
| Linha 352: | Linha 352: | ||
| hist(resid(lmo.h)) | hist(resid(lmo.h)) | ||
| </ | </ | ||
| + | |||
| + | Regressão múltipla, fórmulas, transformação e comparação e seleção de modelos. | ||
| + | <code R> | ||
| + | ## | ||
| + | head(hills) | ||
| + | |||
| + | lm2.h <- lm(time ~ dist + climb, data=hills) | ||
| + | anova(lm2.h) | ||
| + | summary(lm2.h) | ||
| + | par(mfrow=c(2, | ||
| + | plot(lm2.h) | ||
| + | |||
| + | shapiro.test(resid(lm2.h)) | ||
| + | |||
| + | par(mfrow=c(1, | ||
| + | boxcox(time ~dist+climb, | ||
| + | |||
| + | |||
| + | lm2r.h <- lm(sqrt(time) ~ dist + climb, data=hills) | ||
| + | coef(lm2r.h) | ||
| + | ## ou... aproveitando o modelo previamente definido... | ||
| + | lm2r.h <- update(lm2.h, | ||
| + | coef(lm2r.h) | ||
| + | |||
| + | summary(lm2r.h) | ||
| + | |||
| + | ## modelo retirando variavel climb | ||
| + | lm3r.h <- update(lm2r.h, | ||
| + | coef(lm3r.h) | ||
| + | |||
| + | anova(lm3r.h, | ||
| + | |||
| + | stepAIC(lm(time ~ dist*climb, data=hills)) | ||
| + | </ | ||
| + | |||
| + | |||
| + | ===== Materiais apresentados e discutidos no curso: ===== | ||
| + | |||
| + | * [[http:// | ||
| + | * [[http:// | ||
| + | * [[http:// | ||
| + | * [[http:// | ||