Create scatterplot_log_ggplot2.R