regular expression code snippets in r

regex return string after the last underscore in r

remove text after character in r