Как подстроить в R с позиции

strsplit(str1,"_")[[1]][3]
#[1] "HIG"
Bored Barracuda