闪亮的页面标题和图像

Question

我的UI代码如下：

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

...

)

效果很好，但是网页选项卡上的标题看起来像这样：

是否有一种方法可以使页面标题为“ Baller Lab”而又不会在导航栏中删除图像或在导航栏中添加“ baller lab”文本？

这是该网站的链接：BallerLab.us

Answer 1

通过nrow(iris)，您可以使用ind <- sample(2, nrow(iris), replace=TRUE, prob=c(0.67, 0.33))来修改网页标签上的标题

fluidPage