Shiny page title and image

问题

My UI code is the following:

ui <- navbarPage(
theme = shinytheme("paper"),
title = div(img(src="ballerlablogo.png", style="margin-top: -14px;", height = 50)),

...

)

which works well, but then the title on webpage tab looks like this:

is there a way to have the page title be "Baller Lab" without getting rid of the image in the navbar or adding the "baller lab" text in the navbar?

Here is a link to the site: BallerLab.us

回答1:

With fluidPage you can use tags$head to modify the title on the webpage tab

library(shiny)
library(shinythemes)
ui <- fluidPage(
  theme = shinytheme("paper"),
  tags$head(HTML("<title>Baller Lab</title>")), #Without company logo
  #tags$head(HTML("<title>Baller Lab</title> <link rel='icon' type='image/gif/png' href='ballerlablogo.png'>")), #WIth company logo
  navbarPage(title = div(img(src="ballerlablogo.png", style="margin-top: -14px;", height = 50))))

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

shinyApp(ui, server)

来源：https://stackoverflow.com/questions/51688463/shiny-page-title-and-image