闪亮的 navbarpage title href 颜色从蓝色变为白色

Question

我如何更改 href'ed navbarpage 标题的默认颜色 - 在这种情况下，Whosebug 是蓝色的。怎么改成白色。

runApp(list(
  ui = navbarPage(inverse = TRUE,
    title=HTML("<a href=\"http://whosebug.com\">Whosebug</a>"),
    tabPanel("tab1")
    ),
  server = function(input, output) { }
))

我想我需要更改 body link 属性，当我按如下方式更改代码时：

tags$html(<body link="white">
<p><a href="http://www.whosebug.com">Whosebug</a></p>
</body>)

我收到如下错误：

Error: unexpected '<' in "<"
Error: unexpected ')' in ")"

我检查了代码，对于每个开盘 < 都有一个闭盘 /> 在 html 并且对于每个 ( 都有一个闭盘 ) .

如何更改字体颜色？

Answer 1

这是你想要的吗？

runApp(list(
  ui = navbarPage(inverse = TRUE,
    title=HTML("<a style=color:white;  href=\"http://whosebug.com\">Whosebug</a>"),
    tabPanel("tab1")
    ),
  server = function(input, output) { }
))

闪亮的 navbarpage title href 颜色从蓝色变为白色

shiny navbarpage title href color change from blue to white

fonts

colors

title

shiny