Question

我正在使用多个数据集中的日期和时间，并且遇到时区转换问题。所有数据集都设置为GMT，但我需要将时区移回各自的位置。我已经尝试了几件事来推动时代，但一直没有成功。我的第一个错误可能是将系统环境设置为GMT，但在取消时，时区没有转换。有关如何获得时区转换的任何建议都会很棒。我在代码的最后三行尝试转换。

#Sys.setenv(TZ = "GMT")
library(openair)
library(lubridate)
filedir <- "C:/Users/dfmcg/Documents/Thesisfiles/timezones/Mountain"
myfiles <- c(list.files(path = filedir))
paste(filedir, myfiles, sep = '/')
npsfiles <- c(paste(filedir, myfiles,sep = '/'))

for (i in npsfiles[1]) {
  timeozone <- import(i, date="DATE", date.format = "%m/%d/%Y %H", header=TRUE, na.strings="-999")
  y <- c(timeozone$date, tz = "UTC")

  yy<- format(y, tz = "MST7MDT", usetz=TRUE)
}

这是转换前后的数据：

日期O3

09/15/1990 00:00:00 24

09/15/1990 01:00:00 28

09/15/1990 02:00:00 26

09/15/1990 03:00:00 25

09/15/1990 04:00:00 -999

时区在指定时不变

0 个答案: