Rが「オブジェクトの長さが長いとオブジェクトの長さが短いの倍数ではない」という警告が表示される理由がわかりません。
平日の中央値を与えるxtsシリーズで集計を行うことによって生成されるこのオブジェクトがあります。
u <- aggregate(d, list(Ukedag = format(index(d),"%w")), median)
1 314.0
2 282.5
3 270.0
4 267.0
5 240.5
次に、これを元のxtsシリーズに適用しようとします。これは次のようになります(はるかに長い)
head(d)
2009-01-02 116
2009-01-05 256
2009-01-06 286
使用:
coredata(d) <- coredat(d) - u[format(index(d),"%w")];
これは警告になります。
目的は、平日の平均を差し引くことです。警告にもかかわらず動作しているように見えますが、何を心配する必要がありますか?
改訂された解決策:試行2
apply.daily(d, function(x) coredata(x) - u[format(index(x), "%w")] )
私は確かに重大なエラーを抱えていました。これは警告を出さないので、次のようにしてテストしました。
apply.daily(d, function(x) u[format(index(x), "%w")] )
次に、いくつかの日付を確認すると、カレンダーと一致しているように見えました。