Displaying 1 result from an estimated 1 matches for "lonlabels".
2004 Nov 30
4
adding regression curve to xyplot
...Intercept) t
33.3307 0.1393
> range(P100$t)
[1] 4.050469 24.514543
>> predict(lmtest,newdata=data.frame(t=range(P100$t)))
1 2
33.89501 36.74620
As expected, predict gives two values. But inside xyplot() predict gives
300 values:
> xyplot(t~s|factor(lonLabels[whichLon100])*factor(latLabels[whichLat100]),
+ data=P100,pch=".",
+ panel=function(x,y,...){panel.xyplot(x,y,...)
+ thislm <- lm(x~y)
+ print(thislm)
+ newt <- range(P100$t)
+ print(ne...