R中的日期和时间总计

Question

我的数据具有这样的开始和结束时间戳记：

200401010000 200401010030
200401010030 200401010100
200401010100 200401010130 and so on...

我正在尝试使用lubridate和as.POSIXct将这些字段转换为％YYYY％MM％DD％HH％MM格式，但是我只能得到NA。 任何帮助将不胜感激。 我的目标是汇总每个月的数据。 到目前为止，我使用的代码如下：

start_time = as.POSIXct(dat$TIMESTAMP_START, format = "%YYYY%MM%DD %HH%MM",origin = "2004-01-01 00:00", tz="EDT")
stop_time = as.POSIXct(dat$TIMESTAMP_END, format = "%YYYY%MM%DD%HH%MM",origin = "2004-01-01 00:30", tz="EDT")
dat$interval <- interval(start_time, stop_time)

Answer 1

我可以看到两个问题：

1. 如果您已经在使用lubridate ，则应该使用ymd_hm()函数，该函数更干净。

2. 您不能将该函数应用于向量（我假设dat$TIMESTAMP_START和dat$TIMESTAMP_END是）； 为此，您可以使用：

    start_time <- sapply(dat$TIMESTAMP_START, ymd_hm()) end_time <- sapply(dat$TIMESTAMP_END, ymd_hm()) 

   这会将功能应用于向量中的每个项目。