使用as.yearqtr将Qqyyyy转换为季度

Question

如何在R中使用as.yearqtr将"Q12000“这样的字符串转换为季度格式？

我有一个25美分的向量：

x <- c("Q12000", "Q22000", "Q32000")

我尝试了以下代码：

library(zoo)
as.yearqtr(x, format = "Q%q%Y")
# [1] NA NA NA

结果应该是"2000 Q1“"2000 Q2”"2000 Q3“。相反，我得到了所有的NA。

Answer 1

不幸的是，该实现不理解一个季度只能是一个数字，因此需要用非数字来分隔它。例如，在季度后插入一个空格：

as.yearqtr(sub("(..)", "\\1 ", x), format = "Q%q %Y")
## [1] "2000 Q1" "2000 Q2" "2000 Q3"

或者先将其转换为默认格式：

as.yearqtr(sub("Q(.)(....)", "\\2-\\1", x))
## [1] "2000 Q1" "2000 Q2" "2000 Q3"

备注：

x <- c("Q12000", "Q22000", "Q32000")