Added script file for ggplot