gpt4 book ai didi

r - 根据值从 xts 对象中提取日期

转载 作者:行者123 更新时间:2023-12-04 10:58:32 32 4
gpt4 key购买 nike

我想提取出现值变化的 xts 对象的日期,即 A 的值从 1 变为 0 或从 0 变为 1 的日期:

require(xts)
A <- xts(c(1,1,0,0,1,1,0,0,1,1), Sys.Date()-10:1)
colnames(A) <- c("A")

> A
A
2014-12-27 1
2014-12-28 1
2014-12-29 0
2014-12-30 0
2014-12-31 1
2015-01-01 1
2015-01-02 0
2015-01-03 0
2015-01-04 1
2015-01-05 1

想要的结果看起来像这样
> from.one.to.zero
[1] "2014-12-29" "2015-01-02"

> from.zero.to.one
[1] "2014-12-31" "2015-01-04"

最佳答案

你可以试试

index(A[diff(A)<0])
#[1] "2014-12-31" "2015-01-04"

index(A[diff(A)==1])
#[1] "2014-12-29" "2015-01-02"

关于r - 根据值从 xts 对象中提取日期,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/27800356/

32 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com