标志而不是应用程序标题闪亮

Question

如何在 Shiny 应用程序中放置而不是标题：

navbarPage("title",theme = shinytheme("flatly"), 
                   tabPanel("Home",

菜单选项卡大小的一些标志？我尝试了这个解决方案： 如何在闪亮的 navbarPage() 上将图像插入导航栏 但不知何故不起作用。图像太大覆盖所有菜单项

谢谢

Answer 1

这是一个老问题，但我一直在寻找解决方案，当我尝试使用 Shinyapps.io 发布我的应用程序时，我发现的其他问题导致了问题，这是因为我同时使用了fluidPage 和 navbarPage 作为其他建议答案。

这是我从 Shinyapps.io 支持团队收到的解决方案

#~~~~~~~~~~~~~~~~~~~~~~~ LOGAN SERVICES DASHBOARD ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

                   ui <- shiny::navbarPage(

                     #the line of code places the logo on the left hand side before the tabs start. See image below.
                       title = div(img(src='LoganTogether-LOGO.jpg',style="margin-top: -14px; padding-right:10px;padding-bottom:10px", height = 60)),
                       #theme = "journal",
                       windowTitle="Logan Together: Service Map",


          #MAIN TAB~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~                                       

                   tabPanel("Interactive map", # then you go on to code the rest of your UI as normal