quarters <- zoo::as.yearqtr(seq(zoo::as.yearqtr("2019Q2"), zoo::as.yearqtr("2022Q3"), by = 1/4))
quarters <- gsub(" ", "", as.character(quarters))