adding ggplot2 graph