Create scatterplot_log.R