3482
правки
Изменения
м
→Предварительная настройка
{{r-code|code=<nowiki>> timezone <- as.character(profiles[profiles$id == id, "timezone"])</nowiki>}}
Автоматическое определение первого и последнего числа текущего предыдущего месяца:
{{r-code|code=<nowiki>> start.date <- end.date <- as.POSIXlt(Sys.Date(), tz = timezone)
> start.date$mday <- end.date$mday <- 1
> endstart.date$mon <- endstart.date$mon + - 1
> end.date$mday <- end.date$mday - 1</nowiki>}}