<div dir="ltr"><div style="font-family:arial,sans-serif;font-size:13.3333339691162px">Caros,</div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px"><br></div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px">Estou fazendo um exercício teórico de regressão para estimar o efeito de um programa a partir da base de dados disponível no código baixo.</div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px"><br></div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px">library(foreign)</div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px">lalonde <- read.dta("<a href="http://dl.dropboxusercontent.com/u/7453595/BD_LAB/lalonde.dta" target="_blank">http://dl.dropboxusercontent.com/u/7453595/BD_LAB/lalonde.dta</a>") #carrega a base de dados</div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px"><br></div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px">str(lalonde) # variáveis</div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px"><br></div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px"># As variáveis re74, re75 e re78 contêm informações sobre o rendimento para os anos de 1974, 1975 e 1978, respectivamente. </div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px"># A variável de tratamento t indica se o indivíduo participou do programa (t=1) ou se não participou do programa (t=0).</div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px"># As demais variáveis contém características dos trabalhadores</div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px"><br></div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px">Trata-se de um experimento aleatório e quero mostrar que há aleatoriedade no experimento. Assim, estou rodando a seguinte regressão:</div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px"><br></div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px">regressao1 <- lm(re78 ~ t, data=lalonde)</div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px">summary(regressao1)</div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px"><br></div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px">E em seguida incluindo os controles em uma outra regressão e gostaria de mostrar que o estimador de t (tratamento) varia pouco (cerca de <span style="font-family:Calibri,sans-serif;font-size:11pt;line-height:15.6933345794678px">U$ 100,00)</span>.</div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px"><br></div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px">regressao2 <- lm(re78 ~ t+age+educ+nodegree+black+hisp+married, data=lalonde)</div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px">summary(regressao2)</div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px"><br></div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px">Assim, gostaria de fazer um teste para verificar se o estimador de t na regressão 1 é estatisticamente diferente da mesmo estimador na regressão 2. </div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px"><br></div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px">Está certo eu fazer da seguinte forma?</div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px"><br></div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px">install.packages("car")<br></div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px">library(car)</div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px">linearHypothesis(regressao2,"t=1794.3", test = "F")</div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px"><br></div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px">Desde já obrigado pelas ajudas.</div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px"><br></div><div style="font-family:arial,sans-serif;font-size:13.3333339691162px">At.</div><div><br></div>-- <br>Adriano Borges Costa
</div>