Update scatterplot_log_ggplot2.R