R zoo对象和毫秒时间戳

R zoo对象和毫秒时间戳,r,zoo,R,Zoo,关于滴答数据的快速问题。在这种格式下,我有大量的数据,我相信这对于我想要实现的目标来说是完美的。我想保持一定的粒度,以便能够在一秒钟内触发买入/卖出信号 资料 我希望能够创建保持毫秒粒度的zoo对象。我无法将“数据$STAMP”转换为日期。我该怎么做 工作: > as.POSIXlt(data2$TIMESTAMP[3], origin="1970-01-01", tz="EST") [1] "2012-03-05 04:01:36 EST" 不工作: > as.POSIXlt(d

关于滴答数据的快速问题。在这种格式下,我有大量的数据,我相信这对于我想要实现的目标来说是完美的。我想保持一定的粒度,以便能够在一秒钟内触发买入/卖出信号

资料

我希望能够创建保持毫秒粒度的zoo对象。我无法将“数据$STAMP”转换为日期。我该怎么做

工作:

> as.POSIXlt(data2$TIMESTAMP[3], origin="1970-01-01", tz="EST")
[1] "2012-03-05 04:01:36 EST"
不工作:

> as.POSIXlt(data2$STAMP[3], origin="1970-01-01", tz="EST")
[1] "))0'-06-03 15:45:52 EST"
这本质上是一个常见问题——您需要
选项(“digits.secs”=6)
来默认显示亚秒级的时间信息

证人:

R> Sys.time()                    # using defaults: no milli or micros
[1] "2012-07-15 12:51:17 CDT"
R> options("digits.secs"=6)      # changing defaults: presto!
R> Sys.time()
[1] "2012-07-15 12:51:30.218308 CDT"
R> 
现在将其与适当的数值向量结合,适当转换为R的日期时间类型:

R> vec <- 1330938005000000 + cumsum(runif(1:5)*10)
R> vec
[1] 1.331e+15 1.331e+15 1.331e+15 1.331e+15 1.331e+15
R> as.POSIXct(vec/1e6, origin="1970-01-01")
[1] "2012-03-05 09:00:05.000004 CST"
[2] "2012-03-05 09:00:05.000006 CST"
[3] "2012-03-05 09:00:05.000016 CST"
[4] "2012-03-05 09:00:05.000021 CST"
[5] "2012-03-05 09:00:05.000029 CST"
R> 
R>vec-vec
[1] 1.331e+151.331e+151.331e+151.331e+151.331e+151.331e+15
R> 如POSIXct(vec/1e6,origin=“1970-01-01”)
[1] “2012-03-05 09:00:05.000004 CST”
[2] “2012-03-05 09:00:05.000006 CST”
[3] “2012-03-05 09:00:05.000016 CST”
[4] “2012-03-05 09:00:05.000021 CST”
[5] “2012-03-05 09:00:05.000029 CST”
R>

尝试了这个。。仍然无法从数字格式…:>选项(“digits.secs”=6)>as.POSIXlt(data2$STAMP[3],origin=“1970-01-01”,tz=“EST”)[1]”)0'-06-03 15:45:52 EST“>请参见我编辑的答案。如果没有帮助,请提供更多关于您尝试的内容和失败的内容的详细信息。似乎有效,最后一件事,您知道它为什么显示错误的tz吗?
/plugins#date-d@1330938005 Mon Mar 5 04:00:05 EST 2012>as.POSIXct(data$STAMP[1]/1e6,origin=“1970-01-01”,tz=“EST”)[1]“2012-03-05:09:05 EST”>as.POSIXct(data$TIMESTAMP[1],origin=“1970-01-01”,tz=“EST”)[1]“2012-03-05 09:00:05 EST”>as.POSIXct(1330938005,origin=“1970-01-01”,tz=“EST”)[1]“2012-03-05 09:00:05 EST”
+1德克,我称之为已知的动物园之谜(或任何其他需要4dps的东西)。第一次看到它,我花了一个半小时的时间进行自我诊断和修复。
R> vec <- 1330938005000000 + cumsum(runif(1:5)*10)
R> vec
[1] 1.331e+15 1.331e+15 1.331e+15 1.331e+15 1.331e+15
R> as.POSIXct(vec/1e6, origin="1970-01-01")
[1] "2012-03-05 09:00:05.000004 CST"
[2] "2012-03-05 09:00:05.000006 CST"
[3] "2012-03-05 09:00:05.000016 CST"
[4] "2012-03-05 09:00:05.000021 CST"
[5] "2012-03-05 09:00:05.000029 CST"
R>