在R Shiny中将Navbar选项卡垂直居中

问题描述

ui <- shiny::bootstrapPage(
    
    shiny::tags$head(
        # Include custom CSS
        includeCSS("styles.css")
        
    ),shiny::navbarPage(
        
        title = "Test",collapsible = TRUE,theme       = shinythemes::shinytheme("flatly"),shiny::tabPanel(
            "Map"
        )
    )
    
    
    
)

server <- function(input,output,session) {   
    
}

shinyApp(ui,server)

CSS

.container-fluid {
  height: 80px;
}

.leaflet-top .leaflet-control {
    margin-top: 40px;
}

.navbar-nav li a {
  height: 80px;
}

如何在导航标签中垂直居中放置地图文本？使用默认主题，我可以使其正常工作，但是使用平坦主题时，则无法使其居中。

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）