R Check If String Contains Substring