R/nchar_number.R

In meerapatelmd/centipede: Manipulate Strings and Vectors

Defines functions nchar_number

Documented in nchar_number

#' Get the number of numerics in a string
#' @export
#'
nchar_number <-
        function(vector) {
                nchar(gsub("[^0-9]", "", as.character(vector)))
        }