stringr-invert-match-in-r