R Valuebox未显示-仪表板发亮

我想使用flexdashboard包在我闪亮的仪表板中显示值框。请检查我的代码，值框未显示。请在这个问题上帮助我

用户界面代码

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

ui <- dashboardPage(skin = "black",
                    dashboardHeader(title = "test"),

                    dashboardSidebar(
                      sidebarMenu()),

                    dashboardBody(
                                fluidRow(
                                  valueBoxOutput("vbox1", width = 2),
                                  valueBoxOutput("vbox2", width = 2),
                                  valueBoxOutput("vbox3", width = 2),
                                  valueBoxOutput("vbox4", width = 2),
                                  valueBoxOutput("vbox5", width = 2),
                                  valueBoxOutput("vbox6", width = 2))))

库（闪亮）
图书馆（shinydashboard）
库（flexdashboard）
ui您的参数在服务器的valueBox中的循环方式错误。以下MWE适用于我：

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

ui <- dashboardPage(skin = "black",
                    dashboardHeader(title = "test"),

                    dashboardSidebar(
                      sidebarMenu()),

                    dashboardBody(
                      fluidRow(
                        valueBoxOutput("vbox1", width = 2),
                        valueBoxOutput("vbox2", width = 2))))

server <- function(input, output) {

  #valuebox
  output$vbox1 <- renderValueBox({
    d <- 10
    valueBox( "Coss", d)
  })

  output$vbox2 <- renderValueBox({ 
    d <- 42
    valueBox("Ccy", d)
  })

}

shinyApp(ui, server)

库（闪亮）
图书馆（shinydashboard）
库（flexdashboard）
uiflexdashboard包屏蔽valueBoxOutput（），它是shinydashboard包的一个函数。因此，要解决这个问题，您应该使用
shinydashboard:：valueBoxOutput
而不是
valueBoxOutput
a.lay几乎是正确的。
您还需要服务器函数的名称空间

shinydashboard::valueBoxOutput('valueBoxA')

 output$valueBoxA <- shinydashboard::renderValueBox({
    shinydashboard::valueBox(
      'Default',
      x
    )
  })

shinydashboard:：valueBoxOutput（'valueBoxA'）
输出$valueBoxA Hi，此代码仅显示me coss和ccy。但是我没有得到价值箱，我不确定我是否遵循。这是您指定的值在值框中的Coss和Ccy下方显示的结果：请查看更新的问题，我已经发布了仪表板的图像和您的代码。它没有显示ValueBox，这很奇怪。你能分享你的sessionInfo吗（比如分享输入sessionInfo（）的结果）在控制台中？我现在不在计算机旁，但稍后会再次尝试查看此问题。有人对此问题有解决方案吗？我也有同样的问题。您只需要一个带有侧边栏的仪表板吗？因此，您只能使用
shiny
。在90%的情况下，其他两个软件包都没有用处。此外，您的代码可以正常工作对我来说。也许更新所有的软件包？
shinydashboard::valueBoxOutput('valueBoxA')

 output$valueBoxA <- shinydashboard::renderValueBox({
    shinydashboard::valueBox(
      'Default',
      x
    )
  })