separar - Eliminar el patrón de la cadena con gsub

separar cadena de caracteres en r

Question

Estoy luchando para eliminar la subcadena antes del subrayado en mi cadena. Quiero usar * (comodín) como bit antes de que el guión bajo pueda variar:

a <- c("foo_5", "bar_7")
a <- gsub("*_", "", a, perl = TRUE)

El resultado debería verse como:

> a
[1] 5 7

También probé cosas como "^ * " o "? " Pero no funcionó realmente.

Answer 1

El siguiente código funciona en tu ejemplo:

gsub(".*_", "", a)

Answer 2

Alternativamente, también puedes probar:

gsub("//S+_", "", a)

Answer 3

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