# This script contains the basic UI interface of FactorViz, UI code related to individual
# tabs can be found inside UI folder.
baseUI <- function(){
tagList(
navbarPage(
id="base_nav",
theme = shinythemes::shinytheme("cosmo"),
"FactorViz 2.0",
home_tab(),
k_selec(),
l_selec(),
lmc_tab(),
proportion(),
meta_analysis()
#downloads()
#tabPanel("Meta Analysis", "Page Under construction"),
#tabPanel("Downloads", "Page Under construction")
)
)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.