#' lunique
#'
#' Calculates number of unique values in a vector
#'
#' @param x is a vector
#'
#' @return a numeric value
#'
#' @examples
#' lunique(c("A","A","B"))
#'
#' @export
lunique <- function(x) {length(unique(x))}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.