Usage
a %+% b
contain(s1, s2)
endsWith(s1, s2)
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 = "_")
startsWith(s1, s2)