Shiny：从闪亮应用程序中的flexdashboard测量仪

是否可以在Shiny应用程序（shinydashboard或shiny）中嵌入仪表flexdashboard（下图）？Shiny：从闪亮应用程序中的flexdashboard测量仪

从flexdashboardwebsite一个Shiny flexdashboard中的示例代码：

```{r} 
renderGauge({ 
    rate <- computeContactRate(input$region) 
    gauge(rate, min = 0, max = 100, symbol = '%', gaugeSectors(
    success = c(80, 100), warning = c(40, 79), danger = c(0, 39) 
)) 
}) 
```

这里是我的失败尝试：

library(shiny) 
library(shinydashboard) 
#library(flexdashboard) 


ui <-dashboardPage(
    dashboardHeader(), 
    dashboardSidebar(), 
    dashboardBody(
    column(6,box(flexdashboard::gaugeOutput("plt1"),width=12,title="Gauge Graph",background ="green")))) 

server <- shinyServer(function(input, output, session) { 

    output$plt1 <- flexdashboard::renderGauge({ 
     gauge(56, min = 0, max = 100, symbol = '%', label = paste("Test Label"),gaugeSectors(
     success = c(100, 6), warning = c(5,1), danger = c(0, 1), colors = c("#CC6699") 
    )) 

    }) 
}) 

shinyApp(ui = ui, server = server)

感谢您的任何提示！

来源

2017-02-21 Mal_a

你们的榜样为我工作 –

我的坏！我忘了从'library（flexdashboard）'中删除'＃'！小错误，实际上很长时间才能弄清楚！ –

（发表解决方案代表OP）。

我忘了从#library(flexdashboard)删除#，因此该功能gauge不能找到并计无法呈现...

来源

2017-02-21 20:30:59 halfer

Shiny：从闪亮应用程序中的flexdashboard测量仪

回答

相关问题