Create plot_freestyle.R