Utility package for CPI and other inflators.
## process real
## 531ms 482ms
## process real
## 438ms 439ms
## process real
## 391ms 114ms
## process real
## 24.3s 21.1s
## process real
## 984ms 241ms
## process real
## 4.61s 1.25s
x <- seq(as.Date("1999-01-01"), as.Date("2020-01-01"), by = "1 day")
x <- rep_len(x, 1e7)
system_time(cpi_inflator(x, "2019-01-01"))
## process real
## 297ms 311ms
## process real
## 3.67s 1.29s
## process real
## 2.66s 905.37ms