#' Render semanticui htmlwidget
#'
#' htmlwidget that adds semanticui dependencies and
#' renders in viewer or rmarkdown.
#'
#' @import htmlwidgets
#'
#' @param ui UI, which will be wrapped in an htmlwidget.
#' @param width Fixed width for widget (in css units). The default is NULL,
#' which results in intelligent automatic sizing.
#' @param height Fixed height for widget (in css units). The default is NULL,
#' which results in intelligent automatic sizing.
#' @param element_id Use an explicit element ID for the widget
#' (rather than an automatically generated one).
#' @examples
#' library(shiny)
#' library(shiny.semantic)
#' uirender(
#' card(
#' div(
#' class="content",
#' div(class="header", "Elliot Fu"),
#' div(class="meta", "Friend"),
#' div(class="description", "Elliot Fu is a film-maker from New York.")
#' )
#' )
#' )
#'
#' @export
uirender <- function(ui, width = NULL, height = NULL, element_id = NULL) {
semantic.assets::uirender(ui, width = width, height = height, element_id = element_id)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.