Caros,
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.
library(foreign)
lalonde <- read.dta("
http://dl.dropboxusercontent.com/u/7453595/BD_LAB/lalonde.dta";) #carrega a
base de dados
str(lalonde) # variáveis
# As variáveis re74, re75 e re78 contêm informações sobre o rendimento para
os anos de 1974, 1975 e 1978, respectivamente.
# 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).
# As demais variáveis contém características dos trabalhadores
Trata-se de um experimento aleatório e quero mostrar que há aleatoriedade
no experimento. Assim, estou rodando a seguinte regressão:
regressao1 <- lm(re78 ~ t, data=lalonde)
summary(regressao1)
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 U$ 100,00).
regressao2 <- lm(re78 ~ t+age+educ+nodegree+black+hisp+married,
data=lalonde)
summary(regressao2)
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.
Está certo eu fazer da seguinte forma?
install.packages("car")
library(car)
linearHypothesis(regressao2,"t=1794.3", test = "F")
Desde já obrigado pelas ajudas.
At.
--
Adriano Borges Costa
_______________________________________________
R-br mailing list
[email protected]
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código
mínimo reproduzível.
