Usage
a %+% b
contain(s1, s2)
trim (x, trim.trailing=TRUE, trim.leading=TRUE)
escapeUnderline(name)
fileStem(file.name)
firstIndex(s1, s2)
getExt(file.name)
getFileStem(file.name)
getStem(file.name)
lastIndex(s1, s2)
myprint(object, ...)
"myprint"(..., newline = TRUE, digits = 3)
remove.prefix(s, sep = "_")