#' @export
dclr_type <- function(x, ptype, arg = NULL) {
dclr(x, ptype = ptype, arg = as_arg(arg, enexpr(x)))
}
#' @export
dclr_size <- function(x, size, arg = NULL) {
dclr(x, size = size, arg = as_arg(arg, enexpr(x)))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.