Подсчет времени в некоторых диапазонах и начало от получаса в R - PullRequest
Новая
       12

Подсчет времени в некоторых диапазонах и начало от получаса в R

1 голос
/ 24 апреля 2019

У меня есть почти хороший код для подсчета часов в некоторых интервалах времени, но иногда мне приходится начинать, например, с 7:30 утра, и для меня это - пробуждение

У меня есть функция, которая способна отсчитывать часы во времени, на которых я фокусируюсь, кроме выходных, когда речь идет о Рождестве и т. Д.

К сожалению, мне часто приходится считать время от половины часов 


Weekdays3 <- Vectorize(function(date1,date2){

dates <- seq(date1, date2, "mins")

dates <- dates[which(weekdays(dates) %in% c("monday",
                                              "tuesday",
                                              "wednesday",
                                              "thursday",
                                              "friday") & hour(dates) %in% c(8:15) & 
                         !(as.character(dates,format="%Y-%m-%d") %in% c("2018-01-01",
                                                                        "2018-01-06")))]

  length(dates)/60
})

Я должен использовать эту функцию для подсчета часов с 7:30 до 18:00, но теперь я могу считать только с 7:00 до 8:00 и т. Д.

...