Я хочу сделать данные из Google Analytics доступными для пользователей через Flexdashboard, развернутую на AWS. Это поможет смешаться с другими источниками данных и создать воронку (от веб-посещений до желаемых действий).
---
title: "Dashboard"
output:
flexdashboard::flex_dashboard:
orientation: columns
vertical_layout: fill
runtime: shiny
---
```{r setup, include=FALSE}
library(flexdashboard)
library(googleAnalyticsR)
library(googleAuthR)
library(searchConsoleR)
library(tidyverse)
```
dataset <- eventReactive(input$button_execute, {
date_start <- input$input_date_start
date_end <- input$input_date_end
ga_auth()
my_accounts <- ga_account_list()
my_id <- 123456
dataset <- google_analytics(my_id,
date_range = c(date_start,date_end),
metrics = c("sessions"),
dimensions = c("dayOfWeek","hour"),
anti_sample = FALSE)
})
Но, как вы знаете, это работает только для вашего собственного анализа и не для производственные сценарии. Поэтому я должен установить client.id и client.secret, чтобы он работал.
Предполагаемые пользователи имеют свой почтовый аккаунт компании Google. В идеале они могут получить доступ к данным через логин. Итак, я попробовал это:
```
token <- callModule(googleAuth, "login")
dataset <- google_analytics(my_id,
date_range = c(date_start,date_end),
metrics = c("sessions"),
dimensions = c("dayOfWeek","hour"),
anti_sample = FALSE)
```
Но при отправке выдается сообщение об ошибке: Error: redirect_uri_mismatch
Пожалуйста, можете ли вы дать некоторые рекомендации? Это будет полезно для людей, которые хотят получить легкий путь для развертывания своих результатов с помощью Google Analytics и R. Я буду активно следить за этим постом. Спасибо.