loess
smooth for the graph, along with
a loess smooth from the plot of the fitted values on $u$. mmps
is an alias
for marginalModelPlots
, and mmp
is an alias for marginalModelPlot
.marginalModelPlots(...)
mmps(model, terms= ~ ., fitted=TRUE, layout=NULL, ask,
main, ...)
marginalModelPlot(...)
## S3 method for class 'lm':
mmp(model, variable, mean = TRUE, sd = FALSE,
xlab = deparse(substitute(variable)), degree = 1, span = 2/3, key=TRUE,
...)
## S3 method for class 'default':
mmp(model, variable, mean = TRUE, sd = FALSE, xlab =
deparse(substitute(variable)), degree = 1, span = 2/3,
key = TRUE, col.line = palette()[c(4,2)], col=palette()[1],
labels, id.method = "y",
id.n=if(id.method[1]=="identify") Inf else 0,
id.cex = 1, id.col=palette()[1], grid=TRUE, ...)
## S3 method for class 'glm':
mmp(model, variable, mean = TRUE, sd = FALSE,
xlab = deparse(substitute(variable)), degree = 1, span = 2/3, key=TRUE,
col.line = palette()[c(4, 2)], col=palette()[1],
labels, id.method="y",
id.n=if(id.method[1]=="identify") Inf else 0,
id.cex=1, id.col=palette()[1], grid=TRUE, ...)
lm
or glm
,
for which there is a predict
method defined.~ .
, which specifies that all the terms in
formula(object)
will be usedTRUE
, then a marginal model plot in the direction
of the fitted values or linear predictor of a generalized linear model will
be drawn.c(2, 3)
means two rows and three columns.TRUE
, ask before clearing the graph window to draw more plots.main=""
to suppress the title;
if missing, a title will be supplied.mmps
to mmp
and
then to plot
. Users should generally use mmps
, or equivalently
marginalModelPlots
.predict(object)
. Can be any other
vector of length equal to the number of observations in the object. Thus the
mmp
function can be TRUE
, compare mean smoothsTRUE
, compare sd smooths. For a binomial regression with all
sample sizes equal to one, this argument is ignored as the SD bounds don't
make any sense.loess
. The
usual default for loess
is 2, but the default here is 1.loess
.TRUE
, include a key at the top of the plot, if FALSE
omit the
keyid.n=0
suppresses labelling, and setting this
argument greater than zero will include labelling. See
showLabels
for these arguments.mmp
and marginalModelPlot
draw one marginal model plot against
whatever is specified as the horizontal axis.
mmps
and marginalModelPlots
draws marginal model plots
versus each of the terms in the terms
argument and versus fitted values.
mmps
skips factors and interactions if they are specified in the
terms
argument. Terms based on polynomials or on splines (or
potentially any term that is represented by a matrix of predictors) will
be used to form a marginal model plot by returning a linear combination of the
terms. For example, if you specify terms ~ X1 + poly(X2, 3)
and
poly(X2, 3)
was part of the original model formula, the horizontal
axis of the marginal model plot will be the value of
predict(model, type="terms")[, "poly(X2, 3)"])
. If the predict
method for the model you are using doesn't support type="terms"
,
then the polynomial/spline term is skipped.loess
, plot
c1 <- lm(infant.mortality ~ gdp, UN)
mmps(c1)
c2 <- update(c1, ~ poly(gdp, 4), data=na.omit(UN))
# plot against predict(c2, type="terms")[, "poly(gdp, 4)"] and
# and against gdp
mmps(c2, ~ poly(gdp,4) + gdp)
# include SD lines
p1 <- lm(prestige ~ income + education, Prestige)
mmps(p1, sd=TRUE)
# logisitic regression example
# smoothers return warning messages.
m1 <- glm(lfp ~ ., family=binomial, data=Mroz)
mmps(m1)
Run the code above in your browser using DataLab