Есть ли способ удалить панель навигации в функции gentelellaPage или переместить вкладки на боковую панель или панель навигации? - PullRequest
0 голосов
/ 13 июня 2019

Я пытаюсь разработать панель управления, которая требует наличия нескольких вкладок. Я использую функцию gentelellaPage () в пакете gentelellaShiny R. Когда я добавляю вкладки, навигационная панель в функции gentelella больше не нужна, и я хочу удалить ее. Есть ли способ удалить или использовать его иначе, чтобы показать вкладки? Есть ли способ показать вкладки на боковой панели?

library(shiny)
library(plotly)
shinyApp(
  ui = fluidPage(gentelellaPage(shiny::tabsetPanel(
      shiny::tabPanel("Map", fluid = TRUE, tabName = "Home",
               sidebarLayout(sidebarPanel(selectInput("Country", "Select Country", choices = "", selected = "")),
                 mainPanel(
                   htmlOutput("Attacks")
                 )
               )
      ),
      shiny::tabPanel("plot", fluid = TRUE,tabName = "Contact",
              sidebarLayout(
                 sidebarPanel(sliderInput("year", "Year:", min = 1968, max = 2009, value = 2009, sep='')),
                 mainPanel(fluidRow(
                   column(7,  plotlyOutput("")),
                   column(5, plotlyOutput(""))   
                 ))
               ))
    ))), 
  server = function(input, output) {}
)
...