`with_year` argument to quarter should results in quarter year not calendar year

[vspinu]

From https://community.rstudio.com/t/fiscal-year-quarters-not-aligned-to-calendar-quarters/60530

This is how it works in excel:

data.frame(dt = ymd(c("2018-07-15", "2018-12-27", "2019-01-01",
                      "2019-06-01", "2019-07-01", "2019-10-16",
                      "2019-12-31", "2020-01-01", "2020-06-30",
                      "2020-07-01", "2020-11-09", "2021-01-19",
                      "2021-06-30", "2021-07-01")),
           expected = c("2019-Q1", "2019-Q2", "2019-Q3",
                        "2019-Q4", "2020-Q1", "2020-Q2",
                        "2020-Q2", "2020-Q3", "2020-Q4",
                        "2021-Q1", "2021-Q2", "2021-Q3",
                        "2021-Q4", "2022-Q1")) %>%
  mutate(actual = quarter(dt, with_year = T, fiscal_start = 7))

##            dt expected actual
## 1  2018-07-15  2019-Q1 2018.1
## 2  2018-12-27  2019-Q2 2018.2
## 3  2019-01-01  2019-Q3 2019.3
## 4  2019-06-01  2019-Q4 2019.4
## 5  2019-07-01  2020-Q1 2019.1
## 6  2019-10-16  2020-Q2 2019.2
## 7  2019-12-31  2020-Q2 2019.2
## 8  2020-01-01  2020-Q3 2020.3
## 9  2020-06-30  2020-Q4 2020.4
## 10 2020-07-01  2021-Q1 2020.1
## 11 2020-11-09  2021-Q2 2020.2
## 12 2021-01-19  2021-Q3 2021.3
## 13 2021-06-30  2021-Q4 2021.4
## 14 2021-07-01  2022-Q1 2021.1

The solution is to add an extra argument or allow with_year = "natural" or something like that. Alternative naming is welcome. Otherwise I will use "calendar" for default current behavior or "natural" for this new behavior.

[vspinu]

The current behavior is actually bogus. The expected behavior is that of Excel.