x <- c("UGGG! When I use caps I am YELLING!",
"Or it may mean this is VERY IMPORTANT!",
"or trying to make a LITTLE SEEM like IT ISN'T LITTLE"
)
rm_caps_phrase(x)
rm_caps_phrase(x, extract=TRUE)Run the code above in your browser using DataLab