Error saying ERROR Expected tag to be of type header while creating a dashboard using shiny R

Question

I'm trying to create a dashboard using shiny R. I;m ending up with this error:

ERROR: Expected tag to be of type header

code:

shinyUI(
  dashboardPage(
    sliderInput("bins","number of breaks",1,100,50),
    dashboardHeader(title="Edureka"),
    dashboardSidebar(
    menuItem("sales Dashboard"),
    menuSubItem("DevOps"),
    menuSubItem("Blockchain"),
    menuSubItem("AWS"),
    menuItem("Finance Dashboard")),
    dashboardBody(
      fluidRow(
        box(plotOutput("$histogram")),
        box(sliderInput("bins","number of breaks",1,100,50))
      )
    )
    )
  )

Answer 1

sliderInput("bins","number of breaks",1,100,50),

this line should come under dashboardSidebar function.