plot.ppr
Plot Ridge Functions for Projection Pursuit Regression Fit
Description
Plot the ridge functions for a projection pursuit regression (ppr
) fit.
Usage
## S3 method for class 'ppr' plot(x, ask, type = "o", cex = 1/2, main = quote(bquote( "term"[.(i)]*":" ~~ hat(beta[.(i)]) == .(bet.i))), xlab = quote(bquote(bold(alpha)[.(i)]^T * bold(x))), ylab = "", ...)
Arguments
x | an R object of class |
ask | the graphics parameter |
type | the type of line (see |
cex | plot symbol expansion factor (relative to |
main, xlab, ylab | axis annotations, see also |
... | further graphical parameters, passed to |
Value
None
Side Effects
A series of plots are drawn on the current graphical device, one for each term in the fit.
See Also
Examples
require(graphics) rock1 <- within(rock, { area1 <- area/10000; peri1 <- peri/10000 }) par(mfrow = c(3,2)) # maybe: , pty = "s" rock.ppr <- ppr(log(perm) ~ area1 + peri1 + shape, data = rock1, nterms = 2, max.terms = 5) plot(rock.ppr, main = "ppr(log(perm)~ ., nterms=2, max.terms=5)") plot(update(rock.ppr, bass = 5), main = "update(..., bass = 5)") plot(update(rock.ppr, sm.method = "gcv", gcvpen = 2), main = "update(..., sm.method=\"gcv\", gcvpen=2)")
Copyright (©) 1999–2012 R Foundation for Statistical Computing.
Licensed under the GNU General Public License.