将时间和日期分成不同的列（格式=2019-05-26T13:50:56.335288Z）答案

【问题标题】：Separating time and date into different columns (format=2019-05-26T13:50:56.335288Z)将时间和日期分成不同的列（格式=2019-05-26T13:50:56.335288Z）
【发布时间】：2020-09-30 14:56:49
【问题描述】：

在我的数据中，时间和日期存储在“cord”列中（class=因子）。我想将日期和时间分成两个单独的列。

数据如下：

1 2019-05-26T13:50:56.335288Z
2 2019-05-26T17:55:45.348073Z
3 2019-05-26T18:12:00.882572Z 
4 2019-05-26T18:26:49.577310Z

我已成功提取日期使用：cord$Date <- as.POSIXct(cord$Time)

但是，我无法找到一种方法以“H:M:S”格式提取时间。

dput(head(cord$Time)) 的输出返回一长串时间戳：“2020-04-02T13:34:07.746777Z”、“2020-04-02T13:41:11.095014Z”、 “2020-04-02T14:08:05.508818Z”、“2020-04-02T14:17:10.337101Z”等等……

【问题讨论】：

你能添加dput(head(cord$Time))的输出吗？

标签： r datetime split telemetry

【解决方案1】：

提取 H:M:S

library(lubridate)
format(as_datetime(cord$Time), "%H:%M:%S")
#> [1] "13:50:56" "17:55:45" "18:12:00" "18:26:49"

如果你也需要毫秒：

format(as_datetime(cord$Time), "%H:%M:%OS6")
#> [1] "13:50:56.335288" "17:55:45.348073" "18:12:00.882572" "18:26:49.577310"

绳子在哪里：

cord <- read.table(text = "  Time
1 2019-05-26T13:50:56.335288Z
2 2019-05-26T17:55:45.348073Z
3 2019-05-26T18:12:00.882572Z 
4 2019-05-26T18:26:49.577310Z ", header = TRUE)

【讨论】：

感谢您的帮助！ @jphelps13 发布的代码效果更好，但我仍然很感激！

【解决方案2】：

我通常使用lubridate 和data.table 来完成我的日期和操作工作。这适用于我将您的一些原始日期复制为字符串

library(lubridate)
library(data.table)

x <- c("2019-05-26T13:50:56.335288Z", "2019-05-26T17:55:45.348073Z")
# lubridate to parse to date time
y <- parse_date_time(x, "ymd HMS")

# data.table to split in to dates and time
split_y <- tstrsplit(y, " ")
dt <- as.data.table(split_y)
setnames(dt, "Date", "Time")
dt[]

# if you use data.frames instead
df <- as.data.frame(dt)
df

【讨论】：