ggplot2 plot with line