道歉什么可能是一个很基本的问题,我是很新的R.添加abline到augPred情节
我期待以平均出的值提供给读出我的augPred情节一段时间之间的预测。
> head(tthm.groupeddata)
Grouped Data: TTHM ~ Yearmon | WSZ_Code
WSZ_Code Treatment_Code Year Month TTHM CL2_FREE BrO3 Colour PH TURB Yearmon
1 2 3 1996 1 30.7 0.35 0.00030 0.75 7.4 0.055 Jan 1996
2 6 1 1996 2 24.8 0.25 0.00055 0.75 6.9 0.200 Feb 1996
3 7 4 1996 2 60.4 0.05 0.00055 0.75 7.1 0.055 Feb 1996
4 7 4 1996 2 58.1 0.15 NA 0.75 7.5 0.055 Feb 1996
5 7 4 1996 3 62.2 0.20 NA 2.00 7.6 0.055 Mar 1996
6 5 2 1996 3 40.3 0.15 0.00140 2.00 7.7 0.055 Mar 1996
这是我的模型:
modellme<- lme(TTHM ~ Yearmon, random = ~ 1|WSZ_Code, data=tthm.groupeddata)
和我目前的剧情:
plot(augPred(modellme, order.groups=T),xlab="Date", ylab="TTHM concentration", main="TTHM Concentration with Time for all Water Supply Zones")
我想办法通过向读出图要么之间放置线在一个特定的WSZ_Code(我的组)中的特定时间段,并在此期间取平均值...
当然,任何其他方式/帮助或指导将不胜感激!
在此先感谢
也 - 如果这是完全不正确,请不要让我知道! – Rbeginner 2013-05-04 14:06:09