如何在Shiny的侧边栏中制作更小的小部件？

Question

我试图通过缩小每个小部件（或缩小小部件之间的距离）来将更多小部件放入我的侧边栏。我知道在ShinyBS中，有一个“大小”参数，如bsButton("data","Load Data",size="small")。但是，我主要使用uiOutput，然后在server.R中确定小部件的类型。任何人都知道任何类似或以其他方式使小部件更小的方法吗？