tracer la moyenne dans le tracé de densité ggplot2

# Add a vertical line argument: 
geom_vline(aes(xintercept=mean(weight)),
            color="blue", linetype="dashed", size=1)
Fine Fowl