accountPicker: accountPicker UI Shiny Module - pick GA4...

Description Usage Arguments Value See Also Examples

View source: R/shiny-modules-new.R

Description

Makes a dropdown row for use for authentication with GA4 web properties.

Shiny Module for use with accountPickerUI

Usage

1
2
3
accountPickerUI(id, width = NULL, inColumns = FALSE)

accountPicker(id, ga_table, id_only = TRUE)

Arguments

id

Shiny id

width

The width of the input

inColumns

Whether to wrap selectInputs in width=4 columns

ga_table

A table GA4 accounts/web properties from ga_account_summary("ga4")

id_only

Whether to return just the id, not the row

Value

If id_only=FALSE, the row of ga_table for the selected GA4 web property e.g. use ga_table$propertyId to send to ga_data calls. If id_only=TRUE, just the propertyId

See Also

Other Shiny modules: authDropdownUI(), authDropdown(), metricDimensionSelectUI(), multi_selectUI(), multi_select()

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
## Not run: 

ui <- fluidPage(title = "Shiny App",
                 accountPickerUI("auth_menu", inColumns = TRUE))
server <- function(input, output, session){
  token <- gar_shiny_auth(session)
  
  accs <- reactive({
    req(token)
    ga_account_list("ga4")
   })
   
  # module for authentication
  property_id <- accountPicker("auth_menu", ga_table = accs, id_only = TRUE)
 }
 
 shinyApp(gar_shiny_ui(ui, login_ui = silent_auth), server)


## End(Not run)

googleAnalyticsR documentation built on Oct. 7, 2021, 9:06 a.m.