R Check If Substring Is In String