# 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"),
start = as.Date(c("2019-12-31", "2019-01-31", "2019-12-31")),
stringsAsFactors = FALSE
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.