R Shiny:有没有一种方法可以通过DashboardPagePlus执行HTML

Question

大家好，我是UI编程的新手，甚至是R shine的新手。

我有一个闪亮的UI定义为：

....
ui <- shinyUI(
dashboardPagePlus(
....
)
)

我所想做的就是执行一些html来在web浏览器中设置我的选项卡的标题。我尝试过使用流动页面对象来返回标题，但dashboardPagePlus似乎不太喜欢它，我尝试过的其他一些东西包括：

tags$head(HTML("<title>My Tab</title>"))

但它似乎被口译员忽视了。任何见解或资源都将不胜感激。

tags$title("My Tab")

使程序崩溃

....
ui <- shinyUI(
dashboardPage(title = "My Tab"),
dashboardPagePlus(
....
)
)

也使程序崩溃

编辑：图片以提高清晰度我想做的]1

Answer 1

您不需要使用HTML来创建标题(除非您想进行一些自定义格式设置(。

library(shiny)
library(shinydashboard)
library(shinydashboardPlus)

#####/UI/####
header <- dashboardHeaderPlus(
title = "My Tab"
)
sidebar <- dashboardSidebar()
rightsidebar <- rightSidebar()
body <- dashboardBody()
ui <- dashboardPagePlus(title="Browser title", header, sidebar, body, rightsidebar)
#####/SERVER/####
server <- function(session, input, output) { 
}
shinyApp(ui, server)