#' ruf
#' @name lenu
#' @param v class: vector
#' @examples
#' lenu(c(0,1,1,2))
#' @export
lenu <- function(v) {
return(lenu <- length(unique(v)))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.