How to make the distance between boxes small and the box size small in rshiny?

Question

I want to short the distance bewteen the input box and also the size of the input box

ui <- fluidPage(
  sidebarLayout(
    sidebarPanel(
      
      numericI