如何移除R中geom_smooth生成的趋势线，仅保留置信区间？

要移除geom_smooth()生成的趋势线、仅保留置信区间，只需在geom_smooth()中添加color = NA参数即可，修改后的完整代码如下：

# 读取本地Excel数据
Subset <- read_excel("C:/X/X/X/File.xlsx")

ggplot(Subset,aes(x=Date,y=`Qty`))+
  geom_point(color="purple",size=4,pch=20) +
  geom_line(linetype="dashed") +
  geom_smooth(color = NA)  # 关键设置：将趋势线设为透明

补充说明 #

• geom_smooth()默认开启置信区间（se = TRUE），无需额外配置；
• 若要调整置信区间的填充颜色，可添加fill参数自定义，例如geom_smooth(color = NA, fill = "#99CCFF")；
• 用你提供的测试数据集验证的可直接运行代码：

# 加载测试数据集
Subset <- structure(list(Date = structure(c(19389, 19417, 19448, 19478, 
19509, 19539, 19570, 19601, 19631, 19662, 19692, 19723, 19754, 
19783, 19814, 19844, 19875, 19905), class = "Date"), Qty = c(34810, 
34963.3333333333, 35513.3333333333, 36946.6666666667, 38803.3333333333, 
38618.3333333333, 40798.3333333333, 42645, 44686.6666666667, 
46246.6666666667, 43283.3333333333, 40358.3333333333, 39831.6666666667, 
40233.3333333333, 40680, 41103.3333333333, 41446.6666666667, 
41683.3333333333)), row.names = 2:19, class = "data.frame")

# 加载ggplot2并绘图
library(ggplot2)
ggplot(Subset,aes(x=Date,y=`Qty`))+
  geom_point(color="purple",size=4,pch=20) +
  geom_line(linetype="dashed") +
  geom_smooth(color = NA)

内容的提问来源于stack exchange，提问作者user20203146