Мини-боковая панель Shiny Dashboard отображает текст

Question

Я использую Shiny DashboardPlus и хочу, чтобы на боковой панели мини отображались только значки. Проблема в том, что текст появляется также.

Та же проблема и с блестящей приборной панелью.

Код для создания меню боковой панели ниже:

sidebar = dashboardSidebar(
      sidebarMenu(
        menuItem("DASHBOARD1", tabName = "Spectrum", icon = icon("table")
        ), #menuItem
        menuItem("DASHBOARD2", tabName = "LTE", icon = icon("mobile-alt"))        
      )),

Смотрите здесь:

Answer 1

Я думаю, что может быть проблема с версией, поскольку у меня все работает нормально:

library(shiny)
library(shinydashboard)
library(shinydashboardPlus)
shinyApp(
  ui = dashboardPagePlus(
    header = dashboardHeaderPlus(
      enable_rightsidebar = TRUE,
      rightSidebarIcon = "gears"
    ),
    sidebar = dashboardSidebar(
      sidebarMenu(
        menuItem("DASHBOARD1", tabName = "Spectrum", icon = icon("table")
        ), #menuItem
        menuItem("DASHBOARD2", tabName = "LTE", icon = icon("mobile-alt"))        
      )),
    body = dashboardBody(),
    title = "TEST"
  ),
  server = function(input, output) { }
)

Вот пример информации о сеансе:

R версия 3.5.2 (2018-12-20)

блестящий_1.2.0

shinydashboard_0.7.1

shinydashboardPlus_0.6.0.9000