Create 04-RosePlot.R