as.period method for PeriodWithCalendar