#' shorthand wrapper for as.character
#'
#'
#' @param x input
#' @param ... additional arguments
#'
#' @export
#'
char <- function(x,...) {as.character(x,...)}
#' shorthand wrapper for as.integer
#'
#'
#' @param x input
#' @param ... additional arguments
#'
#' @export
#'
int <- function(x,...) {as.integer(x,...)}
#' shorthand wrapper for as.numeric
#'
#'
#' @param x input
#' @param ... additional arguments
#'
#' @export
#'
num <- function(x,...) {as.numeric(x,...)}
#' shorthand wrapper for as.numeric
#'
#'
#' @param x input
#' @param ... additional arguments
#'
#' @export
#'
float <- function(x,...) {as.numeric(x,...)}
#' shorthand wrapper for as.logical
#'
#'
#' @param x input
#' @param ... additional arguments
#'
#' @export
#'
bool <- function(x,...) {as.logical(x,...)}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.