按年和月对年月列进行排序

Question

我正在尝试订购存储在数据框中的一系列时间数据。 格式如下：

"%Y-%b"

看起来像"2009-Sep"等。

到目前为止，我已经设法找到了这种方法：

ds[order(as.Date(ds$yearmonth, format = "%Y-%b")),]

但它只按年份排序，然后按月份的字母顺序排列，给我一个2009-Jan 、 2009-Jul 、 2009-Jun等的顺序。我很困惑这不是一个容易解决的问题。

请帮忙...

最佳卡斯帕

Answer 1

包zoo 中的as.yearmon()函数（和"yearmon"类）专为此类数据而设计：

dat <- c("2009-Sep","2009-Feb","2009-Jan")
require(zoo)
d2 <- as.yearmon(dat, "%Y-%b")
> sort(d2)
[1] "Jan 2009" "Feb 2009" "Sep 2009"
> order(d2)
[1] 3 2 1
> d2[order(d2)]
[1] "Jan 2009" "Feb 2009" "Sep 2009"

您当然可以将paste0()一天粘贴到每个日期并通过as.Date()强制将"Date"类设为"Date" ，但as.yearmon()对我来说似乎更自然：

> as.Date(paste0(dat, "-01"), "%Y-%b-%d")
[1] "2009-09-01" "2009-02-01" "2009-01-01"

请注意，您可以通过生成的胁迫相同的结果"yearmon"对象类"as.Date" ，如：

> as.Date(d2)
[1] "2009-09-01" "2009-02-01" "2009-01-01"