* [[bie5782:02_tutoriais:tutorial7:start|Tutorial]]
* [[bie5782:01_curso_atual:exercicios7| Exercícios]]
* [[bie5782:03_apostila:06-modelos| Apostila]]
====== Exercícios 7 - Regressões Lineares Simples ======
===== 7.1 Altura na Infância e Na Vida Adulta =====
Resolva [[http://www.lage.ib.usp.br/notar/exercicio.php?exerc=8|este exercício]] no sistema notaR.
===== 7.2 Coeficiente de determinação =====
Resolva [[http://www.lage.ib.usp.br/notar/exercicio.php?exerc=87#|este exercício]] no notaR.
/*
Vamos retomar a regressão da massa do cérebro em função da massa corporal de alguns animais, do tutorial [[bie5782:02_tutoriais:tutorial7:start#ajuste_e_diagnóstico_de_uma_regressão|ajuste e diagnóstico de uma regressão]]:
anim.m2 <- lm(log(brain)~log(body),data=Animals,
subset=!(log(Animals$body)>8&log(Animals$brain)<6))
Agora ajuste este modelo:
anim.m0 <- lm(log(brain)~1, data=Animals,
subset=!(log(Animals$body)>8&log(Animals$brain)<6))
E compare os dois:
anova(anim.m0,anim.m2)
===Perguntas===
==1. Qual a relação do comando 'anova' acima com:==
anova(anim.m2)
==2. Qual a relação entre os valores obtidos por estes comandos:==
summary(anim.m0)
mean(log(Animals$brain[!(log(Animals$body)>8&log(Animals$brain)<6)]))
sd(log(Animals$brain[!(log(Animals$body)>8&log(Animals$brain)<6)]))
===Dica===
Um comando mais curto para ajustar o modelo deste exercício, e que ajuda a interpretá-lo:
anim.m0 <- update(anim.m2, .~. -log(body))
*/
===== 7.3 Resíduos de Iris =====
Resolva [[http://www.lage.ib.usp.br/notar/exercicio.php?exerc=33|este exercício]] no sistema notaR.
===== 7.4 Pressão e temperatura =====
Resolva [[http://www.lage.ib.usp.br/notar/exercicio.php?exerc=38|este exercício]] no sistema notaR.
===== 7.5 Seriemas e Carcarás =====
/*
Para a turma do IBUSP 2019 esse exercício deverá ser entregue apenas no próximo módulo (Regressão Linear II). Ou seja, até as 8h da quarta-feira dia 29/05.
*/
Resolva [[http://www.lage.ib.usp.br/notar/exercicio.php?exerc=32|este exercício]] no sistema notaR.