我知道我可以致电:
library(zoo)
Sys.Date()
CQ <- as.yearqtr(Sys.Date())
CQ
得到:
"2015-03-05"
"2015 Q1"
但我需要输出:
"Q1-2015"
如何将CQ转换为QX-YYYY?
答案 0 :(得分:3)
你可以尝试
format(CQ, 'Q%q-%Y')
#[1] "Q1-2015"
答案 1 :(得分:1)
使用基数R可以获得类似的结果。例如,
x <- seq(Sys.Date(), Sys.Date() + 180L, by = "month") # Generate some dates vector
paste(quarters(x), as.POSIXlt(x)$year + 1900L, sep = "-")
## [1] "Q1-2015" "Q2-2015" "Q2-2015" "Q2-2015" "Q3-2015" "Q3-2015"