Create plot.r

R / Circlize routine to plot titles over time