example_apps/load_config_json/app.R

In GMOD/JBrowseR: An R Interface to the JBrowse 2 Genome Browser

library(shiny)
library(JBrowseR)
library(bslib)

ui <- fluidPage(
  # Overriding the default bootstrap theme is needed to get proper font size
  theme = bs_theme(version = 5),
  titlePanel("JSON JBrowseR Example"),
  JBrowseROutput("widgetOutput")
)

server <- function(input, output, session) {
  config <- json_config("./config.json")

  output$widgetOutput <- renderJBrowseR(
    JBrowseR("JsonView",
            config = config,
            location = "10:29,838,737..29,838,819"
    )
  )
}

shinyApp(ui, server)