Create coef_plot.R