`
library(shiny)
ui <- fluidPage(
titlePanel("Hello"),
sidebarLayout(
sidebarPanel("Hello SideBar"),
mainPanel("Hello MainPanel")
)
)
server <- function(input, output) {
}
shinyApp(ui = ui, server = server)
`
Просто по глазу я могу сказать, что сейчас моя боковая панель занимает около 33% ширины экрана.Любая идея, как я могу уменьшить ширину боковой панели, чтобы основная панель была больше?