日次データから月末のみを抽出する

R

今すぐ貴方がフォローすべきたった１つのトゥイッターアカウントである@Nekopuni_氏が

なことを呟かれていて、詳細は以下のBLOGポストにある。


彼が上記のポストで書いてることをもうちょい楽にやるには…to.monthlyでOKながもする。似たような話は昔まとめていたような記憶もある。あるが、よく覚えていないので、ログを漁る必要がある。

library(xts)
data(sample_matrix)
x <- as.xts(sample_matrix)[,1]
to.monthly(x)

こんな感じで月末だけになる。

> to.monthly(x)
         x.Open   x.High    x.Low  x.Close
1 2007 50.03978 50.74150 49.85477 50.07049
2 2007 50.22448 51.29502 50.22448 50.69435
3 2007 50.81620 50.81620 48.25248 48.95616
4 2007 48.94407 50.32009 48.90488 49.13825
5 2007 49.34572 49.59963 47.56210 47.82845
6 2007 47.74432 47.74899 47.19411 47.67468