totitle:

In vlulla/vlutils: Common utilities that I find useful

Usage

totitle(x, USE.NAMES = FALSE)

Arguments

x
USE.NAMES

Examples

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (x, USE.NAMES = FALSE) 
{
    s <- sapply(x, function(x) strsplit(x, "\s", perl = TRUE, 
        fixed = FALSE))
    s <- sapply(s, function(s) paste(gsub("(.)(.*)", "\U\1\E\2", 
        s, perl = TRUE), collapse = " "))
    s
  }

vlulla/vlutils documentation built on May 21, 2019, 12:35 a.m.