Ajuster la Transparence (alpha) de stat_smooth lignes, et pas seulement la transparence de l'Intervalle de Confiance

À l'aide de ggplot2 de stat_smooth(), je suis curieux de voir comment on peut régler la transparence de la ligne de régression. À l'aide de geom_points() ou geom_line(), normalement définit une valeur pour "alpha", en indiquant le pourcentage de transparence. Cependant, avec stat_smooth(), alpha permet de définir la transparence de l'intervalle de confiance (dans mon exemple ci-dessous, éteint - se=FALSE).

Je n'arrive pas à trouver une façon de faire de la ligne de régression(s) une baisse de transparence que 1.

Votre avis serait merveilleux.

Exemple De Code

 library(reshape2)
 df <- data.frame(x = 1:300)
 df$y1 <-  0.5*(1/df$x + 0.1*(df$x-1)/df$x + rnorm(300,0,0.015))
 df$y2 <-  0.5*(1/df$x + 0.3*(df$x-1)/df$x + rnorm(300,0,0.015))
 df$y3 <-  0.5*(1/df$x + 0.6*(df$x-1)/df$x + rnorm(300,0,0.015))
 df <- melt(df, id = 1)

 ggplot(df, aes(x=x, y=value, color=variable)) +
   geom_point(size=2) +
   stat_smooth(method = "lm", formula = y ~ 0 + I(1/x) + I((x-1)/x),
               se = FALSE,
               size = 1.5,
               alpha = 0.5)

Ajuster la Transparence (alpha) de stat_smooth lignes, et pas seulement la transparence de l'Intervalle de Confiance