1 2# makes all letters except first in word lower case 3gsubfn("\\B.", tolower, "I LIKE A BANANA SPLIT", perl = TRUE) 4 5