fitted是拟合值，predict是预测值。模型是基于给定样本的值建立的，在这些给定样本上做预测就是拟合。在新样本上做预测就是预测。

你可以找一组数据试试，结果如何。
fit<-lm(weight~height,data=http://www.mamicode.com/women)
fitted(fit)
predict(fit,newdata=http://www.mamicode.com/data.frame(height=90))##将90代入看结果如何
这是R in action中的例子