inst/shiny-examples/BCGcalc/external/tab_report_single.R

In leppott/BCGcalc: Biological Condition Gradient, calculator

# Report, Single Site

function() {
  sidebarLayout(
    sidebarPanel(
           h2("Report, Single Site")
           , p("This function will render all steps and make available files for download.")
           , br()

           , h4("A. Upload a zip file.")
           , p("Template file in root folder of zip file contains the necessary files and locations.")
           , fileInput("fn_input_rep_single"
                       , label = "Import Zip File for Report, Single"
                       , multiple = FALSE
                       , accept = ".zip"
           )

           , h4("D. Run Operation")
           , p("This button will generate the report")
           , shinyBS::bsButton("b_calc_rep_single"
                                                 , label = "Run Operation")

           , h4("E. Download Output")
           , p("All input and output files will be available in a single zip file.")
           , shinyjs::disabled(downloadButton("b_download_rep_single"
                                              , "Download Results"))

    )## sidebarPanel
    , mainPanel(
        tabsetPanel(type = "tabs"
                  , tabPanel(title = "Calc_Report_Single_About"
                             # ,includeHTML(file.path("www"
                             #                        , "rmd_html"
                             #                        , "ShinyHTML_Report_Single_1About.html"))
                  )## tabPanel
        )## tabsetPanel
    )## mainPanel ~ END
  )##sidebarLayout ~ END
}##FUNCTION ~ END

# output$UI_about = renderUI({
#   p("About stuff here.")
# })