inst/simple/app.R

library(shiny)
library(auth0)

ui <- bootstrapPage(
  fluidRow(plotOutput("plot"))
)

server <- function(input, output, session) {
  output$plot <- renderPlot({
    plot(1:10)
  })
}

shinyAppAuth0(ui, server)
juan-12286/Autenticaci-n-con-Auth0 documentation built on Jan. 1, 2021, 7:11 a.m.