代码之家 › 专栏 › 技术社区 › user113156

将日期格式从一个类转换为另一个类

date r

-2

user113156 · 技术社区 · 6 年前

我有下列日期。

c("Aug 08, 2017", "Aug 09, 2017", "Aug 11, 2017", "Aug 11, 2017", 
"Aug 10, 2017", "Sep 22, 2017", "Aug 11, 2017", "Aug 11, 2017", 
"Aug 11, 2017", "Aug 14, 2017", "Aug 16, 2017", "Aug 16, 2017", 
"Aug 18, 2017", "Aug 18, 2017", "Aug 18, 2017", "Sep 20, 2017", 
"Aug 22, 2017", "Sep 20, 2017", "Sep 14, 2017", "Sep 25, 2017"
)

我正在尝试将它们转换为以下格式:

structure(c(17386, 17387, 17388, 17389, 17392, 17393, 17394, 
17395, 17396, 17399, 17400, 17401, 17402, 17403, 17406, 17407, 
17408, 17409, 17410, 17414), class = "Date")

看起来像;

 [1] "2017-08-08" "2017-08-09" "2017-08-10" "2017-08-11" "2017-08-14" "2017-08-15" "2017-08-16" "2017-08-17"
 [9] "2017-08-18" "2017-08-21" "2017-08-22" "2017-08-23" "2017-08-24" "2017-08-25" "2017-08-28" "2017-08-29"
[17] "2017-08-30" "2017-08-31" "2017-09-01" "2017-09-05"

如何将字符转换为日期格式?

编辑:

我运行以下命令:

> C=c("Aug 08, 2017", "Aug 09, 2017", "Aug 11, 2017", "Aug 11, 2017", 
+     "Aug 10, 2017", "Sep 22, 2017", "Aug 11, 2017", "Aug 11, 2017", 
+     "Aug 11, 2017", "Aug 14, 2017", "Aug 16, 2017", "Aug 16, 2017", 
+     "Aug 18, 2017", "Aug 18, 2017", "Aug 18, 2017", "Sep 20, 2017", 
+     "Aug 22, 2017", "Sep 20, 2017", "Sep 14, 2017", "Sep 25, 2017"
+ )
> as.numeric(as.Date(C,format='%B %d, %Y'))
 [1] NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA
> as.Date(C,format='%B %d, %Y')
 [1] NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA

编辑: 以下也不起作用;

date <- gsub(",", "", date)
date <- gsub(" ", "-", date)
date

as.numeric(as.Date(date, format='%b %d, %Y'))

编辑:

下面的方法似乎有效;

mdy(C)

给;

[1] "2017-08-08" "2017-08-09" "2017-08-11" "2017-08-11" "2017-08-10" "2017-09-22" "2017-08-11" "2017-08-11"
 [9] "2017-08-11" "2017-08-14" "2017-08-16" "2017-08-16" "2017-08-18" "2017-08-18" "2017-08-18" "2017-09-20"
[17] "2017-08-22" "2017-09-20" "2017-09-14" "2017-09-25"

1 回复 | 直到 6 年前

BENY 6 年前

你需要使用 format 在里面 as.Date

as.numeric(as.Date(C,format='%B %d, %Y'))
 [1] 17386 17387 17389 17389 17388 17431 17389 17389 17389 17392 17394 17394 17396 17396 17396 17429 17400 17429 17423 17434

as.Date(C,format='%B %d, %Y')
 [1] "2017-08-08" "2017-08-09" "2017-08-11" "2017-08-11" "2017-08-10" "2017-09-22" "2017-08-11" "2017-08-11" "2017-08-11" "2017-08-14" "2017-08-16"
[12] "2017-08-16" "2017-08-18" "2017-08-18" "2017-08-18" "2017-09-20" "2017-08-22" "2017-09-20" "2017-09-14" "2017-09-25"

第纳尔:

C=c("Aug 08, 2017", "Aug 09, 2017", "Aug 11, 2017", "Aug 11, 2017", 
"Aug 10, 2017", "Sep 22, 2017", "Aug 11, 2017", "Aug 11, 2017", 
"Aug 11, 2017", "Aug 14, 2017", "Aug 16, 2017", "Aug 16, 2017", 
"Aug 18, 2017", "Aug 18, 2017", "Aug 18, 2017", "Sep 20, 2017", 
"Aug 22, 2017", "Sep 20, 2017", "Sep 14, 2017", "Sep 25, 2017"
)