Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/69.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181

Warning: file_get_contents(/data/phpspider/zhask/data//catemap/7/sql-server/22.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
r中的GMTOFF计算_R - Fatal编程技术网

r中的GMTOFF计算

r中的GMTOFF计算,r,R,我把日期分配给了一个 %let a=06jul2016 我想根据sas中完成的两个计算创建两个变量 b=dhms("&a"d,00,00,00)-gmtoff(),IS8601DT23.3)) c=dhms("&a"d,24,00,00)-gmtoff(),IS8601DT23.3)) 注&a将采用2016年7月6日的值 输出 b is 2016-07-06T04:00:00.00 c is 2016-07-07T04:00:00.00 我想创建一个新的变量D,它的值为

我把日期分配给了一个

%let a=06jul2016
我想根据sas中完成的两个计算创建两个变量

b=dhms("&a"d,00,00,00)-gmtoff(),IS8601DT23.3))
c=dhms("&a"d,24,00,00)-gmtoff(),IS8601DT23.3))
注&a将采用2016年7月6日的值

输出

 b is 2016-07-06T04:00:00.00
 c is 2016-07-07T04:00:00.00
我想创建一个新的变量D,它的值为b和c,并且只有很少的字符串

D=tz=2016-07-06T04:00:00.00&tz2016-07-07T04:00:00.00

如何使用R获得上述结果这应该不会太难,因为如果您没有明确提到时区,R将自动将任何日期转换为当前时区:

a <- "06jul2016"
#Assuming you are in GMT+4, otherwise use the explicit
#conversion commented out below
b <- as.POSIXct(a,format="%d%b%Y")
#b <- as.POSIXct(a,format="%d%b%Y",tz="Etc/GMT+4")
attr(b, "tzone") <- "UTC"
format(b, "%Y%-%m-%dT%H:%M:%OS2")
#"2016-07-06T04:00:00.00"

这应该不会太难,因为如果您没有明确提到时区,R将自动将任何日期转换为当前时区:

a <- "06jul2016"
#Assuming you are in GMT+4, otherwise use the explicit
#conversion commented out below
b <- as.POSIXct(a,format="%d%b%Y")
#b <- as.POSIXct(a,format="%d%b%Y",tz="Etc/GMT+4")
attr(b, "tzone") <- "UTC"
format(b, "%Y%-%m-%dT%H:%M:%OS2")
#"2016-07-06T04:00:00.00"
gmtoff()
存储SAS代码运行的当前机器的原始UTC偏移量(如果有人想知道)。
gmtoff()
存储SAS代码运行的当前机器的原始UTC偏移量(如果有人想知道)。