如何将 js 小部件添加到闪亮的仪表板
How to add js widget to shiny dashboard
我正在尝试使用闪亮的插件链接,插件在 js 中
有没有办法添加这个插件
<script src="//platform.linkedin.com/in.js" type="text/javascript"></script> <script type="IN/CompanyInsider" data-id="2896"></script>
到我闪亮的仪表板?
这是我的仪表板代码。
> library(shiny) library(shinydashboard)
>
> ui <- dashboardPage( dashboardHeader(title="Example"),
> dashboardSidebar(
> # Custom CSS to hide the default logout panel
> tags$head(tags$style(HTML('.shiny-server-account { display: none; }'))),
> # The dynamically-generated user panel
> uiOutput("userpanel") ), dashboardBody(
> box(),
> box()
> )
> )
>
>
> server <- function(input, output, session) { }
>
> shinyApp(ui, server)
想通了,
fluidPage(width = 12, status = "primary",
collapsible = TRUE, solidHeader = TRUE,
tags$div(HTML('<script src="//platform.linkedin.com/in.js" type="text/javascript">
</script><script type="IN/CompanyInsider" data-id="2896" data-format="inline" data-width="1"></script'))),
我正在尝试使用闪亮的插件链接,插件在 js 中
有没有办法添加这个插件
<script src="//platform.linkedin.com/in.js" type="text/javascript"></script> <script type="IN/CompanyInsider" data-id="2896"></script>
到我闪亮的仪表板? 这是我的仪表板代码。
> library(shiny) library(shinydashboard)
>
> ui <- dashboardPage( dashboardHeader(title="Example"),
> dashboardSidebar(
> # Custom CSS to hide the default logout panel
> tags$head(tags$style(HTML('.shiny-server-account { display: none; }'))),
> # The dynamically-generated user panel
> uiOutput("userpanel") ), dashboardBody(
> box(),
> box()
> )
> )
>
>
> server <- function(input, output, session) { }
>
> shinyApp(ui, server)
想通了,
fluidPage(width = 12, status = "primary",
collapsible = TRUE, solidHeader = TRUE,
tags$div(HTML('<script src="//platform.linkedin.com/in.js" type="text/javascript">
</script><script type="IN/CompanyInsider" data-id="2896" data-format="inline" data-width="1"></script'))),