0

所以我有1分钟分辨率的数据。假设我只想在一小时后的 1 分钟内对我的子集中的每个点进行采样(例如 9:01、10:01...)。我该怎么做呢?我尝试使用端点,但似乎不可能。

编辑:

AUD_CAD AUD_CHF AUD_JPY AUD_NZD AUD_USD AUX_AUD BCO_USD CAD_CHF CAD_JPY CHF_JPY ETX_EUR EUR_AUD EUR_CAD EUR_CHF EUR_CZK EUR_DKK EUR_GBP EUR_HUF  EUR_JPY EUR_NOK
2012-09-30 17:01:00 1.020020 0.97523  80.827 1.25020 1.03652      NA      NA 0.95623  79.241 82.8625      NA 1.23938 1.26419 1.20882      NA 7.45529 0.79569 285.598 100.1815 7.36363

这是数据的示例

4

2 回答 2

2
## An example xts object with data pts at each minute in the past 12 hours
library(xts)
times <- seq(Sys.time() - 12*60*60, Sys.time(), by="min")
x <- xts(index(times), times)

## Extract only those occuring at one minute past an hour.
x[strftime(index(x), format="%M") == "01"]
#                     [,1]
# 2012-11-18 23:01:41    4
# 2012-11-19 00:01:41   64
# 2012-11-19 01:01:41  124
# 2012-11-19 02:01:41  184
# 2012-11-19 03:01:41  244
# 2012-11-19 04:01:41  304
# 2012-11-19 05:01:41  364
# 2012-11-19 06:01:41  424
# 2012-11-19 07:01:41  484
# 2012-11-19 08:01:41  544
# 2012-11-19 09:01:41  604
# 2012-11-19 10:01:41  664
于 2012-11-19T18:49:49.330 回答
1

如果您使用.indexmin. 假设您的 xts 对象名为x

x[.indexmin(x)==1,]
于 2012-11-20T01:16:03.910 回答