[[Rの備忘録]] # 指定の長さの日付けオブジェクトを生成する year1 <- seq (as.Date ("2000-12-1"), by = "days", length = 50) # 期間内の各曜日の数 table (weekdays (year1))