Question

我有一些数据必须格式化为（％d /％m /％Y）。数据不按时间顺序排列，因为它按第一个数字排序，即第一个数字，而不是月份。

我希望我可以指定order或reorder我希望排序以不同方式发生。我只是不确定如何做到这一点。

以下是一些要订购的日期数据：

date
1/1/2009  
1/1/2010
1/1/2011
5/4/2009
5/4/2011
10/2/2009
10/3/2011
15/9/2010
15/3/2009
31/12/2011
31/7/2009

感谢您的任何建议。

Answer 1

按列date排序时，将其转换为日期格式。

df[order(as.Date(df$date,format="%d/%m/%Y")),,drop=FALSE]
         date
1    1/1/2009
6   10/2/2009
9   15/3/2009
4    5/4/2009
11  31/7/2009
2    1/1/2010
8   15/9/2010
3    1/1/2011
7   10/3/2011
5    5/4/2011
10 31/12/2011

Answer 2

在plyr和lubridate的帮助下，这更容易：

library(lubridate)
library(plyr)

df <- read.csv(text = "date
1/1/2009  
1/1/2010
1/1/2011
5/4/2009
5/4/2011
10/2/2009
10/3/2011
15/9/2010
15/3/2009
31/12/2011
31/7/2009", stringsAsFactors = FALSE)

# Convert variable to date    
df$date <- dmy(df$date)
arrange(df, date)
# Or for descending order
arrange(df, desc(date))

Answer 3

丑陋但似乎有效：

date[order(sapply(strsplit(date, "/"), 
                  function(x) { paste(x[3], sprintf("%02d", as.integer(x[1])), 
                                            sprintf("%02d", as.integer(x[2])), 
                                            sep="") 
                              }
                 )
          )
    ]

按时间顺序排序数据框，格式为％d /％m /％Y的日期

3 个答案: