R/valuebox.R

In etc5523-2020/r-package-assessment-whysptra: Launch a Covid-19 cases in Southeast Asia

#' @name valuebox
#' 
#' @title Refactor the ValueBoxOutput()
#'
#' @description This function will refactor the ValueBoxOutput() into a single function
#'
#' @param id The character vector of InputId
#'
#' @examples valuebox("confirmed")
#' valuebox("recovered")
#' valuebox("death")
#'
#'
#' @export
library(shinydashboard)
valuebox <- function(id){
  shinydashboard::valueBoxOutput(id, width=3)
}