从gam图中保存数据而不实际绘制数据？

Question

有没有一种方便的方法从gam图中提取数据,而不实际绘制gam对象？

这是一个虚拟的例子. plot.data有我想要的数据,但我不希望情节窗口受到影响.

library(mgcv)    
x=1:10000/1000
y = sin(x)+rnorm(10000,sd=2)
m = gam(y~s(x))
plot.data<-plot(m,plot=F)

Answer 1

它看起来不像plot.gam没有绘图的选项.但你可以试试

plot.data <- {
    dev.new()
    res <- plot(m)
    dev.off()
    res
}

或者可能

plot.data <- {
    pdf(NULL)
    res <- plot(m)
    invisible(dev.off())
    res
}