agberg

library(shiny)
library(stringr)

# Module UI function
fieldSelectorInput <- function(id) {
  # Create a namespace function using the provided id
  ns <- NS(id)
  
  tags$div(id = ns("id"),
           tagList(

agberg

# If this were a working example then the function would take inputs, probably as (...) this was just hacked together as a connection to a particular datababase.

disable_connection_pane <- function(){
  
  saved_option = getOption("connectionObserver")
  
  options(connectionObserver = NULL)

  con <- DBI::dbConnect(odbc::odbc(),
                        dsn = "dsn")

agberg

Keybase proof

I hereby claim:

• I am agberg on github.
• I am agberg (https://keybase.io/agberg) on keybase.
• I have a public key ASA5Iw1TgEu5GF70ZB0OSnfFUs3L2M8uiK9cYqCoG1y4xQo

To claim this, I am signing this object:

agberg

This gist holds the files necessary to reproduce a minimal example of "printing" a flexdashboard using a headless browser.