1

我使用了一个广义的加法模型来分析一些数据,现在希望绘制结果。

library(mgcv)
set.seed(2) ## simulate some data... 
dat <- gamSim(1,n=400,dist="normal",scale=2)
b <- gam(y~s(x0)+s(x1)+s(x2)+s(x3),data=dat)
plot(b,pages=1)

从上面的示例中,如何将各个图保存到不同的 pdf 文件中?

4

1 回答 1

3

?plot.gam 告诉你有一个选择参数

library(mgcv)
set.seed(2) ## simulate some data... 
dat <- gamSim(1,n=400,dist="normal",scale=2)
b <- gam(y~s(x0)+s(x1)+s(x2)+s(x3),data=dat)
plot(b,pages=1)
plot(b, select = 1)
plot(b, select = 2)
于 2012-06-27T08:34:22.540 回答