y_duck 我在使用ggplot2的函数geom_smooth对散点图进行平滑时,选用的平滑方法是stats::loess方法,并添加了置信带。我想知道这个置信度的具体算法,但我发现stats::loess并没有提供这个方法,置信带的算法应该是ggplot2里面定义的。R中运行gplot2::geom_smooth看不到实现的源代码,应该怎么查看置信带计算的源代码呢?