Update 03_data_plot.R