当我改变轴限制时，ggplot2改变平滑条件均值的估计

Question

我试图从散点图中平滑点。有两组，我想分别对它们进行平滑处理。

为了说明正在发生的问题，我根据

生成数据

set.seed(400)
x=seq(0,2,0.01)
Data=data.frame(x=rep(x,2),y=c(rnorm(5*x,0,0.05),rnorm(5*x+0.5,0,0.05)),z=c(rep("1",length(x)),rep("2",length(x))))

这里，z表示组。

如果我使用

绘制平滑曲线

ggplot(Data, aes(x,y)) + geom_smooth(aes(color=z,linetype=z),method="gam",size=2,se=FALSE)+scale_y_continuous(limits=c(-0.01,0.01))

我得到了

但是，如果我更改y轴限制，我会得到不同的结果：

ggplot(Data, aes(x,y)) + geom_smooth(aes(color=z,linetype=z),method="gam",size=2,se=FALSE)+scale_y_continuous(limits=c(-0.005,0.005))

换句话说：我唯一改变的是y轴限制，但我得到的回归估计不同。

为什么会发生这种情况以及如何纠正它的任何想法？

谢谢！