時系列データの範囲をインクリメントして定義するR

Question

時系列の株価データがあり、15分ごとにデータを抽出したい。 （列の時間にログイン） 開始時刻と終了時刻が

DF_spread

DF_spread_interval <- DF_spread[DF_spread$Time %within% int,] 

今すぐしたいデータフレームからデータを抽出間隔

int <- new_interval(date1, date2) 

の定義

start_date1 <- as.POSIXct("2016-11-01 09:00:00") 
end_date2 <- as.POSIXct("2016-11-01 09:15:00") 

です15分ごとにデータを抽出します。各繰り返しでstart_date1が15分増分され、end_date2も15分増分されます。

増分はend_date2は、同じ日の午後3時30分の終点に達した際に停止する必要がありますすなわち

end_date2 <- as.POSIXct("2016-11-01 15:30:00") 

助けてください。

Answer 1

我々は試すことができます

st <- start_date1 + seq(0, 1500, by = 60)*15 
et <- end_date1 + seq(0, 1600, by = 60)*15 

Map(function(x,y) {intl <- new_interval(x,y); 
       DF_spread[DF_spread$Time %within% int,]}, 
        st, et)