一小时增量R，动物园

Question

如何1小时添加到所有的动物园系列的索引的元素？

我试图

newseries <- myzooseries 
index(newseries) <- index(myzooseries)+times("1:00:00") 

，但我得到的消息

Incompatible methods   ("Ops.dates", "Ops.times") for "+" 

感谢

我的指标是日期和时间的chron的对象，但我已经用简单的例子试过，我不能让它

Answer 1

这是很容易通过将你在数字方式所需的时间解决的：

newseries <- myzooseries 
index(newseries) <- index(myzooseries) + 1/24

代上对象被表示为十进制数，所以可以用它来计算。一天是1，所以一小时是1/24，一分钟1/1440等。你可以很容易地看到这一点，如果你使用的功能倍。这给你测试的对象的时间，例如：

> A <- chron(c("01/01/97","01/02/97","01/03/97"))

> B <- A + 1/24

> B
[1] (01/01/97 01:00:00) (01/02/97 01:00:00) (01/03/97 01:00:00)

> times(A)
Time in days:
[1] 9862 9863 9864

> times(B)
Time in days:
[1] 9862.042 9863.042 9864.042


> times(B-A)
[1] 01:00:00 01:00:00 01:00:00

> times(A[3]-B[1])
Time in days:
[1] 1.958333

Answer 2

转换为POSIXct，添加60 * 60（在第1h），然后转换回。