Есть ли простой способ получить дату начала и окончания предыдущего месяца из текущей даты в R?

У меня есть только текущая дата. Из него я хочу получить предыдущий месяц, дату начала предыдущего месяца, дату окончания предыдущего месяца.

currentDate<-Sys.Date() #return today's date as "2012-11-07"

Я хочу, чтобы предыдущая дата начала месяца была 2012-10-01, а дата окончания 2012-10-31 от сегодняшней даты.