Мы можем использовать substring
из base R
, если количество извлекаемых символов равно 2 из последней позиции каждой строки.
substring(v1, nchar(v1)-1)
#[1] "S3" "S5" "S5" "S3"
Или с sub
для сопоставления символов до_
и замените его пустым (""
)
sub(".*_", "", v1)
data
v1 <- c("ADCY7_S3", "AIMP2_S5", "ALKBH7_S5", "ALOX5AP_S3")