# Balance component

balanceComponent <- function()
{
  tabsetPanel(
    tabPanel("Bar graph",
             wellPanel(
             plotOutput("balance")
           )
    ),
    tabPanel("Pie chart",
             wellPanel(
             plotOutput("balancePieChart")
           )
    )
  )
}