R/I_simpleCap.R

Defines functions .simpleCap

# Simple function that capitalizes first letter of each word
.simpleCap <- function(x) {
  s <- strsplit(x, " ")[[1]]
  paste(toupper(substring(s, 1,1)), substring(s, 2),
        sep="", collapse=" ")
}
mfasiolo/mgcViz documentation built on Aug. 30, 2024, 3:29 p.m.