我有一个数据集，看起来像这样
我正试图以与arrive和leave相同的方式将合并shift_date与shift_start和shift_end结合起来，这样我就可以比较这两个数据点。我试过lubridate和strptime，但也许是“aidom.”而不是“AM”把它扔了。我还尝试了其他使用%I %p化它的方法，但也不起作用。有什么建议我该怎么解决这个问题吗？
arrive
leave
shift_date
shift_start
shift_end
lubridate
strptime
%I %p
x0fgdtte1#
x <- "17-May-82" y <- "1 p.m." #if locale isn't an English one: lct <- Sys.getlocale("LC_TIME"); Sys.setlocale("LC_TIME", "C") #adjust timezone as needed #use gsub to remove dots as.POSIXct(paste(x, gsub(".", "", y, fixed = TRUE)), "%d-%b-%y %I %p", tz = "GMT") #[1] "1982-05-17 13:00:00 GMT" #reset locale Sys.setlocale("LC_TIME", lct)
1条答案
按热度按时间x0fgdtte1#