#' Miscellaneous helpers
#'
#' Find most repeated value in a vector
#' @export
mostrepeated <- function(x) as(names(which.max(table(x))), mode(x))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.