如何在代码中使用
shiny$HTML
而不是 tags$head(shiny$HTML(...)
来编写下面的内容?
例如:
tags$head(
HTML("<title> Dashboard</title>
<link rel='shortcut icon' href='www/lll.png'></link>
<link rel='stylesheet' href='www/shiny.css'></link>
<script src='www/shiny.js'></script>"
)
)
有效。
我插入
<head>
标签而没有 tags$head
:
HTML("<head>
<title> Dashboard</title>
<link rel='shortcut icon' href='www/hell.png'></link>
<link rel='stylesheet' href='www/shiny.css'></link>
<script src='www/shiny.js'></script>
</head>"
)
不起作用。
我想使用
shiny$HTML
标签,只是,纯粹,没有tags$head
。有可能吗?
简单闪亮的应用程序:
library(shiny)
library(shinydashboard)
h <- dashboardHeader(title = "a")
s <- dashboardSidebar()
b <- dashboardBody()
ui <- dashboardPage(h, s, b, skin = "blue")
server <- function(input, output) {
}
shinyApp(ui, server)