Last chance! 50% off unlimited learning
Sale ends in
data("USConsump1979")
Greene2003
, USConsump1950
, USConsump1993
data("USConsump1979")
plot(USConsump1979)
## Example 1.1 in Greene (2003)
plot(expenditure ~ income, data = as.data.frame(USConsump1979), pch = 19)
fm <- lm(expenditure ~ income, data = as.data.frame(USConsump1979))
summary(fm)
abline(fm)
Run the code above in your browser using DataLab