如何在R中复制月度周期图表

I'd like to output a chart similar to the one represented on this page (on the right) using R and any package that would make it look good:I'd like to output a chart similar to the one r