R/nChar.R

Defines functions .nchar

Documented in .nchar

.nchar <- function(x) {
  x[is.na(x)] <- ""
  sapply(strsplit(x, NULL), length)
}
pobsteta/gftools documentation built on March 28, 2020, 8:25 p.m.