dev/shiny-classic-expired/global.R

In datastorm-open/shinymanager: Authentication Management for 'Shiny' Applications

# Global ------------------------------------------------------------------

library(shiny)
library(shinymanager)


# data.frame with credentials info
credentials <- data.frame(
  user = c("fanny", "victor", "benoit"),
  password = c("azerty", "12345", "azerty"),
  comment = c("alsace", "auvergne", "bretagne"),
  expire = as.Date(c("2019-12-31", "2019-01-31", "2019-12-31")),
  stringsAsFactors = FALSE
)