-1

次のように、30 分の頻度で不規則にサンプリングされたデータセットがあります。毎日の最後のタイムスタンプのインデックスを抽出する必要があります。データセットは次のとおりです。

datetime <-c("8/19/2011 16:00",
"8/19/2011 17:30",
"8/19/2011 18:30",
"8/19/2011 19:30",
"8/22/2011 4:00",
"8/22/2011 6:00",
"8/22/2011 7:00",
"8/22/2011 19:00",
"8/22/2011 19:30",
"8/23/2011 4:00",
"8/24/2011 5:30",
"8/24/2011 7:00",
"10/25/2011 7:30")

以下のように POSIXlt オブジェクトに変換しました。

datetime <- strptime(datetime, format="%m/%d/%Y  %H:%M")
datetime <- as.POSIXlt(datetime)

ただし、毎日の最後のインデックスを抽出することはできません。各日の最後のタイムスタンプのインデックスとしての出力が必要です。つまり、私の出力は次のようになります

list of (4, 9, 10,12,13) corresponding to datetime values of 
"8/19/2011 19:30"
"8/22/2011 19:30"
"8/23/2011 4:00"
"8/24/2011 7:00"
"10/25/2011 7:30"

どんな助けでも大歓迎です。ありがとう!

4

2 に答える 2