Расстояние между пунктами меню боковой панели

Question

Я работаю над созданием блестящей приборной панели и пытаюсь создать пространство между различными меню боковой панели.Ниже приведен код, который я написал для пользовательского интерфейса.

library(shiny)
require(shinydashboard)
library(ggplot2)
library(dplyr)
library(shiny)
library(shinydashboard)

ui <-  dashboardPage(
  dashboardHeader(),
    dashboardSidebar(
      sidebarMenu(
        menuItem("Dashboard", tabName = "dashboard", icon = icon("dashboard")),
        menuItem("Visit-us", icon = icon("send",lib='glyphicon'), 
                 href = "http://www.burgerking.co.nz/"),
        sidebarSearchForm(textId = "searchText", buttonId = "searchButton",
                          label = "Search..."),
        fileInput("file1", "Choose CSV File",
                  accept = c(
                    "text/csv",
                    "text/comma-separated-values,text/plain",
                    ".csv")),
        selectInput(
               "select",
               label = h3("Select Channel"),
               choices = c("All", "a", "b", "c"),
               selectize = TRUE,
               selected = "All")
                 )),
    dashboardBody()
  )

Может ли кто-нибудь помочь мне показать, как можно добавить пробелы между элементами меню на боковой панели

Answer 1

В dashboardBody() добавьте эту спецификацию CSS:

tags$head(tags$style(".sidebar-menu li { margin-bottom: 100px; }"))

При необходимости измените 100px.