Displaying 1 result from an estimated 1 matches for "droptoken".
2019 Oct 07
0
Changing HTML Error code message
...uot;tabs",
tabPanel("Html Pages", htmlOutput("viewReport"))), width
= 10)
)
)
#IMPORTANT: The two lines below needs to be run just one time unless the
token is deleted
# Create Token
# token <- drop_auth()
# Save token
# saveRDS(token, "droptoken.rds")
token <- readRDS("droptoken.rds")
server <- shinyServer(function(input, output) {
# ---------------------------------------------------
filePutReport <- reactive(
paste(input$Cat, "_", input$Year, "_Doc.html", sep = "")
)...