R/inferGroup.R

Defines functions inferGroup

inferGroup <- function(v) {

v <- gsub("^([\\. ])*", "",  v)

v <- gsub("\\.csv$", "", v)

v <- gsub("[[:digit:]]*$", "", v)

v <- tolower(gsub("\\.*$", "", v))

as.factor(v)

}

Try the PloGO2 package in your browser

Any scripts or data that you put into this service are public.

PloGO2 documentation built on Nov. 8, 2020, 5:40 p.m.