fluidRow( box(title = "Fold Change Analysis",solidHeader = T,status = "primary",width=8, textInput("FCThreshold", label = h3("Fold Change Threshold:")), actionButton("FCSubmit", label="Submit"), actionButton("FCReset", label="Reset") ) )or can use separate fluid row
fluidRow(
column(6, align="center", offset = 3,
actionButton("button",label = "search),
tags$style(type='text/css', "#button { vertical-align- middle; height- 50px; width- 100%; font-size- 30px;}")
)