导入R中没有时区的数据和时间对象

Question

我导入了一个CVS文件，它的日期和时间格式如下。

date<-c("2017-04-17", "2017-04-18", "2017-04-19" )
times<-c( "23:45","0:00","17:00")

我想创建一个与我的系统时间具有不同时区的日期和时间对象。

parse_date_time(paste(temp1$Date, temp1$variable, sep=" "), orders = "%Y-m/%d %H:%M")

现在，假设导入时的时区不是UTC，而是UTC-6或EST，我想将其转换为另一个时区。我该怎么做呢？

Answer 1

在lubridate包中：

> library(lubridate)
> date<-c("2017-04-17", "2017-04-18", "2017-04-19" )
> times<-c( "23:45","0:00","17:00")
> paste(date, times)
[1] "2017-04-17 23:45" "2017-04-18 0:00"  "2017-04-19 17:00"
> ymd_hm(paste(date, times))
[1] "2017-04-17 23:45:00 UTC" "2017-04-18 00:00:00 UTC" "2017-04-19 17:00:00 UTC"
> ymd_hm(paste(date, times), tz="EST")
[1] "2017-04-17 23:45:00 EST" "2017-04-18 00:00:00 EST" "2017-04-19 17:00:00 EST"