在R中将日期转换为文本

Question

我有一个包含日期（YYYY-MM-DD）的数据集：

> dates
 [1] "20180412" "20180424" "20180506" "20180518" "20180530" "20180611" "20180623" "20180705" "20180717" "20180729"

我希望将它们转换为格式为DD-MMM-YYYY的日期，其中月份为文本。例如，20180412 应该变成 12Apr2018。 有什么建议吗？

- GCGM

---

请查看 format 和 strptime。 - lebatsnok

Answer 1

您可以尝试类似于以下方式的方法：

您可以尝试以下方法：

# print today's date
today <- Sys.Date()
format(today, format="%B %d %Y") "June 20 2007"

在使用format()函数打印日期时，可以使用以下符号1

- TOAN TRAN

Answer 2

您需要先将文本字符串解析为Date对象，然后按照您的喜好格式化这些Date对象，以获得不同的文本输出：

R> library(anytime)   ## one easy way to parse dates and times
R> dates <- anydate(c("20180412", "20180424", "20180506", "20180518", "20180530",
+                    "20180611", "20180623", "20180705", "20180717", "20180729"))
R> dates
 [1] "2018-04-12" "2018-04-24" "2018-05-06" "2018-05-18" "2018-05-30"
 [6] "2018-06-11" "2018-06-23" "2018-07-05" "2018-07-17" "2018-07-29"
R> 
R> txtdates <- format(dates, "%d%b%Y")
R> txtdates
 [1] "12Apr2018" "24Apr2018" "06May2018" "18May2018" "30May2018"
 [6] "11Jun2018" "23Jun2018" "05Jul2018" "17Jul2018" "29Jul2018"
R> 

- Dirk Eddelbuettel

Answer 3

你可以使用 as.Date() 和 format() 函数：

dts <- c("20180412", "20180424", "20180506", "20180518", "20180530", 
         "20180611", "20180623")

format(as.Date(dts, format = "%Y%m%d"), "%d%b%Y")

更多信息 在这里。

- forestfanjoe

Answer 4

只需使用as.POSIXct和as.format：

dates <- c("20180412", "20180424", "20180506")
format(as.POSIXct(dates, format="%Y%m%d"),format="%d%b%y")

输出：

[1] "12Apr18" "24Apr18" "06May18"

- Saurabh Chauhan