Nothing
#' Create a Boostrap 4 column
#'
#' Build an argon column
#'
#' @param ... Any UI element.
#' @param width Optional. Column width between 1 and 12.
#' @param center Whether to center column elements or not. FALSE by default.
#' @param offset Column offset. NULL by default. Importantly, offset + width cannot exceed 12!
#'
#' @examples
#' if (interactive()) {
#' library(argonR)
#' argonColumn(
#' width = 4,
#' argonAlert(
#' icon = "basket",
#' status = "danger",
#' "This is an alert",
#' closable = TRUE
#' )
#' )
#' }
#'
#'
#' @author David Granjon, \email{dgranjon@@ymail.com}
#'
#' @export
argonColumn <- function (..., width = NULL, center = FALSE, offset = NULL) {
colCl <- "col-sm"
if (!is.null(width)) colCl <- paste0(colCl, " col-sm-", width)
if (!is.null(offset)) colCl <- paste0(colCl, " offset-sm-", offset)
if (center) colCl <- paste0(colCl, " text-center")
htmltools::tags$div(class = colCl, ...)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.