#' Contains underscores
#'
#' Does the input contain an underscore
#'
#' @param funs Character vector
#' @export
contains_underscores <- function(funs){
grepl("_", funs)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.