#' @export
nchar_letter <-
function(vector) {
nchar(gsub("[^A-Za-z]", "", as.character(vector)))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.