Good day my fellow R bloggers, after running my ui code, my submit button appears to be ontop of the sidebar panel instead of being below it. how do I get this resolved?
#UI CODE
ui <- shinyUI(fluidPage(
headerPanel(title="STATISTICAL PROCESS CONTROL"),
sidebarLayout(
sidebarPanel(
tags$h2("Input:"),
textInput(inputId="txt1",label= "sql script:")
), # sidebarPanel
actionButton("submitbutton", "Submit",
class = "btn btn-primary")
),
mainPanel(
tabsetPanel(type = "tab",
tabPanel("PLOT_CELL",plotOutput("plot_cell")),
tabPanel("CELL_STAT",tableOutput("CELL_STAT")),
tabPanel("COUNT_MEASURES",tableOutput("COUNT_MEASURES")),
tabPanel("STAT_MEASURES",tableOutput("STAT_MEASURES"))
) # mainPanel
), # Navbar 1, tabPanel
) # navbarPage
) # fluidPage