R plot.ppr 绘制投影寻踪回归拟合的岭函数

说明

绘制投影追踪回归 (ppr) 拟合的岭函数。

用法

## 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 = "", ...)

参数

x	一个R类的对象"ppr"由调用产生ppr.
ask	图形参数ask：有关详细信息，请参阅par。如果设置为TRUE，将在每个横截面的图之间询问。
type	要绘制的线条类型(请参阅plot.default)。
cex	绘图符号扩展因子(相对于 par("cex") )。
main, xlab, ylab	轴注释，另请参见 title 。可以是一个表达式(取决于 i 和 bet.i )，默认情况下将是 eval() uated。
...	更多图形参数，传递给 plot() 。

值

None

副作用

在当前图形设备上绘制一系列图，每个图对应拟合中的每个项。

例子

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)")

也可以看看

ppr , par