r - R 時系列データ、毎日のみ営業日

Question

次のコードを使用しています。

dates<-seq(as.Date("1991/1/4"),as.Date("2010/3/1"),"days")

ただし、営業日のみにしたいのですが、どうすればいいですか？(1991 年 1 月 4 日が月曜日であると仮定すると、1991 年 6 月 4 日と 1991 年 7 月 4 日を除外したいと思います。それは毎週です。)

ご協力ありがとうございました。

Answer 1

日付を間違って入力しています。1991/1/4 が月曜日であることが暗示される YYYY/DD/MM 入力モードを使用するには、as.Date にフォーマット文字列が必要です。

したがって、週末を除外したい場合の完全な解決策は次のとおりです。

 X <- seq( as.Date("1991/1/4", format="%Y/%m/%d"), as.Date("2010/3/1", format="%Y/%m/%d"),"days")
weekdays.X <- X[ ! weekdays(X) %in% c("Saturday", "Sunday") ]  
        # negation easier since only two cases in exclusion
        # probably do not want to print that vector to screen.
str(weekdays.X)

あなたのコメントについては、再現できません。私は得る：

> table(weekdays(weekdays.X) )

   Friday    Monday  Thursday   Tuesday Wednesday 
     1000      1000       999       999       999