# All recessions since 1857
fred_recession_dates()
# Modern era only
fred_recession_dates(from = "1948-01-01")
# Flag a vector of dates
fred_recession_dates(flag = seq(as.Date("2007-01-01"), as.Date("2010-12-01"),
by = "month"))
Run the code above in your browser using DataLab