# NOT RUN {
valueBoxOutput("value_box")
output$value_box <- renderValueBox({
valueBox(
value = 33.45,
subtitle = "Simple valuebox",
icon = icon("bar chart"),
color = "purple",
width = 5)
})
# }
Run the code above in your browser using DataLab