inst/shinyApp/ui_layers/ui_correlation_table.R

In luismurao/nichetoolbox: From getting biodiversity data to evaluating species distribution models in a friendly GUI environment

# UI bivariate correlations table

#-----------------------------------------------------------------------------------
corre_table_1 <- sidebarLayout(position = "left",
                             sidebarPanel(
                               titlePanel("NicheToolBox"),
                               helpText("Correlation table"),
                               busyIndicator("Computation In progress",wait = 0),
                               downloadButton(outputId="download_cor_table",label="Download table")
                             ),
                             mainPanel(
                               dataTableOutput("corr_table")
                             ))