inst/apps/brapi_connect/app.R

In c5sire/brapps: Functions for Demoing Breeding API

#library(shiny)
library(brapi)
library(brapps)

ui <- fixedPage(
      brapiConnectInput("brapi")
)

server <- function(input, output, session) {
  callModule(brapiConnect, "BrAPI DB")
}

shinyApp(ui, server)