2016-05-25 28 views

回答

1

这也适用,可能会更容易:

library(zoo) 

qtr=2016.4 
as.yearqtr(toString(qtr), format="%Y.%q") 

[1]"2016 Q4" 
2

zoo::as.yearqtr()的输入是十进制年份。

试试这个:

library(zoo) 
x <- 2106 + (0:11)/12 
as.yearqtr(x) 
[1] "2106 Q1" "2106 Q1" "2106 Q1" "2106 Q2" "2106 Q2" "2106 Q2" "2106 Q3" "2106 Q3" 
[9] "2106 Q3" "2106 Q4" "2106 Q4" "2106 Q4" 

或:

x <- 2106 + (0:3)/4 

x 
[1] 2106.00 2106.25 2106.50 2106.75 

as.yearqtr(x) 
[1] "2106 Q1" "2106 Q2" "2106 Q3" "2106 Q4" 
+0

我看了 “回到未来” 最近。 :-) – Andrie

+0

@Andrie感谢您的快速回复,但qtr是随机的,所以我认为这是行不通的。我认为你正在修改输入以获得所需的输出。谢谢! – Meesha

+2

@Meesha我没有修改输入。我正在演示'as.yearqtr()'是如何工作的。它需要十进制输入。所以'2016.4'指的是今年的0.4,即四月份左右,即在Q2。所以该函数的行为如预期。 – Andrie