Using Negative Lookbehind to Extract Substrings with Multiple Conditions in R's str_extract Function