Question

我有"1/1/2010 10:00"格式的时间。我想将其转换为时间对象。这次是公司在阿尔伯塔省卡尔加里的时间。请注意，公司时间没有进行夏令时调整。我如何将其转换为日期时间对象？

Answer 1

您可以使用as.POSIXct创建日期/时间对象。看起来像卡尔加里，艾伯塔省的时区是UTC-07：00，所以你可以做到

strptime("1/1/2010 10:00", format="%m/%d/%Y %H:%M", tz="Etc/GMT-7")

（假设月/日/年格式 - 有关其他格式选项，请参阅?strptime）。您可以随时使用＆＃34; GMT＆＃34;而不是指定真正的时区。代替。

Answer 2

假设您不希望时区出现在最终对象中，您可以尝试以下操作。我发布这个作为答案而不是对MrFlick的答案的评论，因为如果我尝试使用我的代码只有一个日期它似乎不起作用。出于某种原因，我的代码似乎仅在日期/时间data.frame时才有效。

my.data <- read.csv(text='
id,date,time,latitude,longitud
AA,3/16/2017,1:30,19.735,-156.085
AA,3/16/2017,2:57,19.800,-156.065
AA,3/16/2017,3:42,19.830,-156.057
AA,3/16/2017,17:31,19.963,-155.952
BB,3/16/2017,17:44,19.964,-155.951
BB,3/17/2017,2:46,19.985,-155.998
', header = TRUE, stringsAsFactors = FALSE, sep = ',')

my.data$date.time <- do.call(paste0, list(my.data$date, ' ', my.data$time))

my.data$date.time <- strptime(my.data$date.time, "%m/%d/%Y %H:%M", tz = "")
my.data
#  id      date  time latitude longitud           date.time
#1 AA 3/16/2017  1:30   19.735 -156.085 2017-03-16 01:30:00
#2 AA 3/16/2017  2:57   19.800 -156.065 2017-03-16 02:57:00
#3 AA 3/16/2017  3:42   19.830 -156.057 2017-03-16 03:42:00
#4 AA 3/16/2017 17:31   19.963 -155.952 2017-03-16 17:31:00
#5 BB 3/16/2017 17:44   19.964 -155.951 2017-03-16 17:44:00
#6 BB 3/17/2017  2:46   19.985 -155.998 2017-03-17 02:46:00

str(my.data)
#'data.frame':   6 obs. of  6 variables:
# $ id       : chr  "AA" "AA" "AA" "AA" ...
# $ date     : chr  "3/16/2017" "3/16/2017" "3/16/2017" "3/16/2017" ...
# $ time     : chr  "1:30" "2:57" "3:42" "17:31" ...
# $ latitude : num  19.7 19.8 19.8 20 20 ...
# $ longitud : num  -156 -156 -156 -156 -156 ...
# $ date.time: POSIXlt, format: "2017-03-16 01:30:00" "2017-03-16 02:57:00" "2017-03-16 03:42:00" "2017-03-16 17:31:00" ...

转换为没有时区的日期和时间？

2 个答案: