powered by
linesHyperb.lm(object, c.prob=0.95, confidence=FALSE, k=if (confidence) Inf else 1, col=2, lty=2, do.abline=TRUE)
lm(.)
k
Inf
k = Inf
lines
predict.lm(*, interval=)
data(swiss) plot(Fertility ~ Education, data = swiss) # the data (lmS <- lm(Fertility ~ Education, data = swiss)) linesHyperb.lm(lmS) linesHyperb.lm(lmS, conf=TRUE, col="blue")
Run the code above in your browser using DataLab