View | Details | Raw Unified | Return to bug 15329 | Differences between
and this patch

Collapse All | Expand All

(-)/Users/johnm1/r-svn/stats/man/termplot.Rd (-1 / +11 lines)
Lines 23-29 Link Here
23
         col.smth = "darkred", lty.smth = 2, span.smth = 2/3,
23
         col.smth = "darkred", lty.smth = 2, span.smth = 2/3,
24
         ask = dev.interactive() && nb.fig < n.tms,
24
         ask = dev.interactive() && nb.fig < n.tms,
25
         use.factor.levels = TRUE, smooth = NULL, ylim = "common",
25
         use.factor.levels = TRUE, smooth = NULL, ylim = "common",
26
         plot = TRUE, \dots)
26
         plot = TRUE, transform.x=FALSE, \dots)
27
}
27
}
28
\arguments{
28
\arguments{
29
  \item{model}{fitted model object}
29
  \item{model}{fitted model object}
Lines 61-66 Link Here
61
     \code{"free"} when limits are computed for each plot.}
61
     \code{"free"} when limits are computed for each plot.}
62
   \item{plot}{if set to \code{FALSE} plots are not produced: instead a
62
   \item{plot}{if set to \code{FALSE} plots are not produced: instead a
63
     list is returned containing the data that would have been plotted.}
63
     list is returned containing the data that would have been plotted.}
64
   \item{transform.x}{if set to \code{TRUE}, partial residuals for terms
65
     such as \code{log(x)} are plotted against transformed values.
66
     The model response is then a straight line, allowing a
67
     ready comparison against the data or against the curve
68
     obtained from \code{smooth-panel.smooth}.}
64
   \item{\dots}{other graphical parameters.}
69
   \item{\dots}{other graphical parameters.}
65
}
70
}
66
\details{
71
\details{
Lines 112-117 Link Here
112
termplot(model, partial.resid = TRUE, se = TRUE, main = TRUE)
117
termplot(model, partial.resid = TRUE, se = TRUE, main = TRUE)
113
termplot(model, partial.resid = TRUE, smooth = panel.smooth, span.smth = 1/4)
118
termplot(model, partial.resid = TRUE, smooth = panel.smooth, span.smth = 1/4)
114
if(!had.splines && rs) detach("package:splines")
119
if(!had.splines && rs) detach("package:splines")
120
121
require(MASS)
122
hills.lm <- lm(log(time) ~ log(climb)+log(dist), data=hills)
123
par(mfrow=c(1,2))
124
termplot(hills.lm, transform.x=c(FALSE,TRUE), partial=TRUE, smooth=panel.smooth)
115
}
125
}
116
\keyword{hplot}
126
\keyword{hplot}
117
\keyword{regression}
127
\keyword{regression}

Return to bug 15329