R 日期格式，如何将日期格式更改为 2011 年 6 月 1 日

Question

我想把2011-06-01表示成2011年6月1日的格式

我怎样才能做到这一点？

Answer 1

一种方法是编写您自己的例程，将 'st'、'nd'、'rd'、'th' 后缀添加到您从标准函数中获得的内容 strftime()和/或 format() .

编辑:这是一个草稿:

R> datesuffix <- function(dom) { switch(as.character(dom), 
+                                       "1"="st", "2"="nd", 
+                                        "3"="rd", "th") }
R> nicedate <- function(d) { dlt <- as.POSIXlt(d); 
+                            paste(format(dlt, "%Y %B %e"),
+                                  datesuffix(dlt$mday), sep="") }
R> nicedate(Sys.Date())
[1] "2011 June  9th"
R> nicedate(as.Date("2011-06-01"))
[1] "2011 June  1st"

编辑 2 我猜你想重新排序日期字符串。我在北美呆太久了...

R> nicedate <- function(d) { dlt <- as.POSIXlt(d); 
+                            paste(as.character(dlt$mday), 
+                                  datesuffix(dlt$mday),
+                                  format(dlt, " %B %Y"), sep="") }
R> nicedate(as.Date("2011-06-01"))
[1] "1st June 2011"
R> nicedate(as.Date("2011-06-02"))
[1] "2nd June 2011"
R> nicedate(Sys.Date())
[1] "9th June 2011"
R> 

编辑 3 必须更正 datesuffix()首先转换为字符。