【发布时间】:2014-06-30 16:26:58
【问题描述】:
我正在运行一个如下所示的玩具预测模型:
model1 <- lm(weight ~ age)
plot(predict(model1), weight)
pred.frame <- data.frame(age = 4:20)
pp <- predict (model1, int = "p", newdata = pred.frame)
pc <- predict (model1, int = "c", newdata = pred.frame)
plot(age, weight, ylim = range(weight, pp, na.rm = TRUE))
pred.model1 <- pred.frame$age
matlines(pred.model1, pc, lty = c(1,2,2), col = 'black')
matlines(pred.model1, pp, lty = c(1,3,3), col = 'black')
但是,我得到的图形有 pc 和 pp 线被切断:
尝试了几台电脑,我一直得到相同的结果。两者都运行最新版本的 mac os,带有小牛,石英生成图形。
对我可能做错的事情有什么想法吗?谢谢
【问题讨论】:
-
用
pred.frame <- data.frame(age = 4:40)再试一次 -
如果要将x轴向下延伸到4,请在
plot()中设置xlim=c(4,max(age))。对于基本图形,一旦调用plot,限制将不会更改为matplot不会更改视图窗口,即使它有超出范围的点
标签: r statistics linear-regression prediction confidence-interval