R: Create an info or value box output (server side)

renderValueBox {shinydashboard} | R Documentation

## Create an info or value box output (server side)

### Description

This is the server-side function for creating a dynamic `valueBox` or `infoBox`.

### Usage

    renderValueBox(expr, env = parent.frame(), quoted = FALSE)

    renderInfoBox(expr, env = parent.frame(), quoted = FALSE)

### Arguments

`expr` | An expression that returns a Shiny tag object, `HTML`, or a list of such objects.
`env` | The environment in which to evaluate `expr`.
`quoted` | Is `expr` a quoted expression (with `quote()`)? This is useful if you want to save an expression in a variable.

### See Also

`valueBoxOutput` for the corresponding UI-side function.

### Examples

    ## Only run this example in interactive R sessions
    if (interactive()) {
    library(shiny)

    ui <- dashboardPage(
      dashboardHeader(title = "Dynamic boxes"),
      dashboardSidebar(),
      dashboardBody(
        fluidRow(
          box(width = 2, actionButton("count", "Count")),
          infoBoxOutput("ibox"),
          valueBoxOutput("vbox")
        )
      )
    )

    server <- function(input, output) {
      output$ibox <- renderInfoBox({
        infoBox(
          "Title",
          input$count,
          icon = icon("credit-card")
        )
      })
      output$vbox <- renderValueBox({
        valueBox(
          "Title",
          input$count,
          icon = icon("credit-card")
        )
      })
    }

    shinyApp(ui, server)
    }

[Package shinydashboard version 0.5.3 Index]