library(foreign)
setwd('C:/Users/fillshun/Desktop/R计量经济学/Wooldridge_5th_stata_data')
shuju <- read.dta("HPRICE1.dta",
convert.factors=F)
library(mice)
md.pattern(shuju)
fit <- lm(shuju$price~1+shuju$sqrft+shuju$bdrms)
summary(fit)
#fitted(fit)
new <- data.frame(sqrft = 140,bdrms = 1)
pre <- predict(fit,new,interval="prediction",level=0.95)-coef(fit)[1]
想问下大佬应该怎么修改,才能出现预测值