# 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(
DT::dataTableOutput("corr_table1")
))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.