Remove pattern from string with gsub

Question

I am struggling to remove the substring before the underscore in my string. I want to use * (wildcard) as the bit before the underscore can vary:

a <- c(\         


        

Answer 1

as.numeric(gsub(pattern=".*_", replacement = '', a)
[1] 5 7