Added ggplot2 script file