ui-server-userinfo • auth0

Source: https://github.com/curso-r/auth0/blob/master/inst/ui-server-userinfo

Don’t forget to configure your environment variables.

Also, set the port, running something like options(shiny.port = 8080).

global.R

a0_info <- auth0::auth0_info()

ui.R

library(shiny)
library(auth0)

auth0_ui(fluidPage(logoutButton()), info = a0_info)

server.R

library(auth0)

auth0_server(function(input, output, session) {
  observe({ print(session$userData$auth0_info) })
}, info = a0_info)

_auth0.yml

name: myApp
remote_url: ''
auth0_config:
  api_url: !expr paste0('https://', Sys.getenv("AUTH0_USER"), '.auth0.com')
  credentials:
    key: !expr Sys.getenv("AUTH0_KEY")
    secret: !expr Sys.getenv("AUTH0_SECRET")