Я ссылаюсь на этот вопрос 2 года назад, с ggplot:Отрегулируйте прозрачность (альфа) строк stat_smooth, а не только прозрачность доверительного интервала

Первый предложенный метод позволяет установить альфа-прозрачность только для доверительного интервала:

ggplot(head(airquality, 60), aes(x=Day, y=Temp, color=factor(Month))) +
  geom_point() + stat_smooth(method = "lm", se=TRUE, alpha=1.0)

Второй метод позволяет установить альфа-прозрачность для самой линии, но высвободный доверительный интервал между тем, даже сse=TRUE:

ggplot(head(airquality, 60), aes(x=Day, y=Temp, color=factor(Month))) +
  geom_point() + geom_line(stat='smooth', method = "lm", se=TRUE, alpha=0.3)

Мой вопрос: Как контролировать прозрачность как линии сглаживания, так и доверительного интервала?