Displaying 1 result from an estimated 1 matches for "tstpred".
Did you mean:
testpred
2016 Aug 07
1
problem with abine(lm(...)) for plot(y~x, log='xy')
...o:
In the following plot, the fitted line plots 100 percent above
the points:
tstDat <- data.frame(x=10^(1:3), y=10^(1:3+.1*rnorm(3)))
tstFit <- lm(log(y)~log(x), tstDat)
plot(y~x, tstDat, log='xy')
abline(tstFit)
I can get the correct line with the following:
tstPredDat <- data.frame(x=10^seq(1, 3, len=2))
tstPred <- predict(tstFit, tstPredDat)
lines(tstPredDat$x, exp(tstPred))
I tried "abline(tstFit)" hoping it would work. If the error had
not been so obvious, I might not have noticed it.
Thanks for your work to build a be...