Getting previous month start date and end date from current date in R

Question

Is there any easy way for getting start date and end date of previous month from the current date in R?

I have only the current date. From it, i want to get the prev

Answer 1

Previous Month Start Date:

format(Sys.Date() - 30, '%Y-%m-01')

Previous Month End Date:

as.Date(format(Sys.Date(), '%Y-%m-01')) - 1