Nothing
#' Define allowable range of values
#'
#' @param allowed Allowed values of categorical column (character or factor)
#' @seealso \code{\link{detect_value_range_violations}}
#' @return No return value, called for side effects
#' @export
#'
domain_categorical <- function(allowed) {
list(type = "categorical",
allowed = allowed) -> range
class(range) <- c("value_range", class(range))
range
}
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.