3482
правки
Изменения
м
→Предварительная настройка
> view <- "All data" # название представления
> id <- profiles[profiles$websiteUrl == siteURL & profiles$name == view, "id"]</nowiki>}}
=== Диапазон дат ===
Определяем часовой пояс согласно настройкам ресурса в GA для корректного преобразования времени в R:
{{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
> end.date$mon <- end.date$mon + 1
> end.date$mday <- end.date$mday - 1</nowiki>}}
Преобразование даты в класс <code>POSIXlt</code> (именованный список) даёт возможность считывать и изменять отдельные части даты и времени<ref>Подробнее <code>help(DateTimeClasses)</code>.</ref>.
== Анализ посещаемости сайта ==