2016-07-14 11 views
0

土曜日と日曜日と特定の休日を除いてRの日付に日を追加したいとします。土曜日の日曜日と特定の休日なしの営業日を追加する

library(bizdays) 
library(lubridate) 
cal <- Calendar(weekdays=c('sunday', 'saturday')) 
data$f <- offset(d, days, cal) 
data 

は、私は日なし得ることができます。

d <- dmy("25-7-2016","26-7-2016") 
days <- c(3:4) 
data <- data.frame(d,days) 
data 

は私が試してみました日付(D列)に次のコードを#days(日]列)を追加したい:私はdatesetを持っていると仮定土曜日と日曜日を考慮して。しかし、特定の休日、すなわち27-7-2016を除外したいと考えています。私はこの特定の休日を取り入れようとしましたが、エラーが発生しました。私が試したコードは、次のとおりです:

holiday <- dmy("27-7-2016") 
cal <- Calendar(holiday,weekdays=c('sunday', 'saturday')) 
data$f <- offset(d, days, cal) 
data 

私は解決が手伝ってください。期待してくれてありがとう!

答えて

0

ワークスあなたはstart.dateend.date追加した場合:

holiday <- dmy("27-7-2016") 
cal <- Calendar(holidays = holiday, 
       start.date = dmy("01-07-2016"), 
       end.date = dmy("01-09-2016"), 
       weekdays=c('sunday', 'saturday')) 
data$f <- offset(d, days, cal) 
data 

はあなたを取得します:

Warning message: 
In Calendar(holidays = holiday, start.date = dmy("01-07-2016"), : 
This function will be deprecated, use create.calendar instead. 
:FYI

  d days   f 
1 2016-07-25 3 2016-07-29 
2 2016-07-26 4 2016-08-02 

Calendarは警告メッセージを表示します

関連する問題