如何将 lubridate 解析函数与 R 管道一起使用?

How can I use lubridate parsing function with a R pipeline?

我正在尝试编写一个管道来解析日期向量并从每个值中减去 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()

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

对于这种转换你最好使用 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))