时间戳

首页 > 解决方案 > 如何在 R 管道中使用 lubridate 解析函数？

r - 如何在 R 管道中使用 lubridate 解析函数？

问题描述

我正在尝试编写一个解析日期向量并从每个值中减去 4 小时的管道。以下是一些示例数据：

structure(list(Created = c("24/04/2019 05:03:45", "24/04/2019 05:03:47", 
"24/04/2019 05:03:56", "24/04/2019 05:04:00", "24/04/2019 11:51:57", 
"24/04/2019 05:58:21", "23/04/2019 10:36:24", "24/04/2019 01:33:53", 
"23/04/2019 18:44:50", "23/04/2019 18:25:19"), Ended = c("Â", 
"Â", "Â", "Â", "24/04/2019 12:20:26", "24/04/2019 11:51:57", 
"23/04/2019 10:51:21", "24/04/2019 05:03:56", "24/04/2019 01:33:53", 
"23/04/2019 18:44:50")), row.names = c(NA, 10L), class = "data.frame")

这有效：

Data$Ended <- dmy_hms(Data$Ended)
Data$Ended <- Data$Ended - hours(4)

但是这第一步不会：

Data$Ended %>% dmy_hms()

我收到此警告消息：所有格式都无法解析。未找到格式。

标签： rdatetimepipelinelubridate

解决方案

对于这种转换，您最好使用mutate() 管道框架，您可以避免对每个字段使用 Data$。如果我们假设 Data 看起来像这样，您可以尝试：

Data <- tibble(Ended=c('23-04-2019 00:00:00', '23-04-2019 01:00:00', 
                       '24-04-2019 00:00:00', '24-04-2019 01:00:00'))

Data <- Data %>% 
  mutate(Ended=dmy_hms(Ended)- hours(4))

推荐阅读