下面是一个数据集,我想要检索第1,2,3,4季度和该特定年份的所有数据。比如说,如果这一年是2013年,我想要2013年第四季度的报告。任何人都可以帮助我。
ID Phase Date Result
1001 2 20/09/2013 complete
1003 3 20/01/2014 END
1002 1 20/06/2013 complete
1004 2 02/03/2013 Initiated
1004 2 02/12/2013 Initiated
答案 0 :(得分:0)
您可以使用quarter
中的lubridate
。
library(lubridate)
QQ <- read.table(
header=TRUE, text='
ID Phase Date Result
1001 2 20/09/2013 complete
1003 3 20/01/2014 END
1002 1 20/06/2013 complete
1004 2 2/3/2013 Initiated
1004 2 2/12/2013 Initiated')
QQ$Date <- as.Date(QQ$Date, format = "%d/%m/%Y")
QQ[quarter(QQ$Date) == 4, ]
# ID Phase Date Result
#5 1004 2 2013-12-02 Initiated
quarter(QQ$Date)
#[1] 3 1 2 1 4