Update plotCurtailmentOnCalendar.R