Ich habe einen String in einer Variablen, die wir v1 nennen. Diese Zeichenfolge enthält Bildnummern und hat die Form "Bild 27 + 28". Ich möchte die erste Zahl extrahieren und in einer neuen Variablen namens item speichern.

Ein Code, den ich ausprobiert habe, ist:

item <- unique(na.omit(as.numeric(unlist(strsplit(unlist(v1),"[^0-9]+")))))

Dies funktionierte gut, bis ich auf eine Liste stieß, die lautete:

[1,] "Pic 26 + 25"
[2,] "Pic 27 + 28"
[3,] "Pic 28 + 27"
[4,] "Pic 29 + 30"
[5,] "Pic 30 + 29"
[6,] "Pic 31 + 32"

Zu diesem Zeitpunkt erhalte ich mehr Zahlen als ich möchte, da auch andere eindeutige Zahlen (die 25) erfasst werden.

Ich habe es tatsächlich mit gsub versucht, habe aber nichts zu arbeiten. Hilfe wäre sehr dankbar!