R的预测

基本程序如下：

x=c(4,6,7,10,13)

y=c(40,60,50,70,90)

fit1=lm(y~x)

summary(fit1)

我想求样本内的拟合值并预测，如x等于14，15
我只会逐步做：
predict(fit1）   #求拟合值
predict(fit1,data.frame(x=c(14，15)))      #求x等于14和15的预测值

我想，能否一步到位？我做了如下尝试：
predict(fit1,data.frame(x=list(x,c(14，15))))
但没有成功。

你可以把原有数据和新数据合成一个vector
predict(fit1, newdata = data.frame(x = c(x, c(14, 15))))

如果想用list的话，可以

lapply(list(old = data.frame(x), new = data.frame(x = c(14, 15))), predict, object = fit1)

版主很厉害啊

吉林小王子 发表于 2012-3-3 22:31
版主很厉害啊

同感！
欢迎小王子光临！