使用 am/pm 解析时间戳

Question

我有一个格式化时间戳的文件，例如 25/03/2011 9:15:00 pm

如何使用 strptime 或 as.POSIXct< /a>?

这是几乎有效的：

> as.POSIXct("25/03/2011 9:15:00", format="%d/%m/%Y %I:%M:%S", tz="UTC")
[1] "2011-03-25 09:15:00 UTC"

这是无效的，但我想工作：

> as.POSIXct("25/03/2011 9:15:00 p.m.", format="%d/%m/%Y %I:%M:%S %p", tz="UTC")
[1] NA

我在 MS Windows 上使用 R 版本 2.13.2 (2011-09-30)。我的工作区域是“C”：

Sys.setlocale("LC_TIME", "C")

Answer 1

AM/PM 指示器似乎不能包含标点符号。去掉标点符号后试试：

td <- "25/03/2011 9:15:00 p.m."
tdClean <- gsub("(.)\\.?[Mm]\\.?","\\1m",td)
as.POSIXct(tdClean, format="%d/%m/%Y %I:%M:%S %p", tz="UTC")
# [1] "2011-03-25 21:15:00 UTC"

Answer 2

刚刚遇到这个，作为另一个选项，您可以使用 stringr 包。

library(stringr)
data$date2 <- str_sub(data$date, end = -4) 
# this removes the punctuation but holds onto the A/P values
data$date2 <- str_c(data$date2, 'm') 
# adds the required m