Aufteilen und Verbinden

strsplit(x, split) teilt eine Zeichenkette an jedem Trennzeichen. Die Funktion gibt eine Liste mit einem Zeichenvektor pro Eingabezeichenkette zurück. Verwende daher [[1]], um die Bestandteile einer einzelnen Zeichenkette zu erhalten.

csv <- "red,green,blue"
parts <- strsplit(csv, ",")[[1]]
print(parts)
print(length(parts))

Ausgabe:

[1] "red"   "green" "blue" 
[1] 3

paste() funktioniert in die andere Richtung. Mit collapse fügt es die Elemente eines Vektors zu einer einzigen Zeichenkette zusammen, wobei der Text collapse zwischen ihnen steht. sep steht zwischen den Argumenten, Element für Element.

words <- c("one", "two", "three")
print(paste(words, collapse = "-"))
print(paste(words, 1:3, sep = "_"))

Ausgabe:

[1] "one-two-three"
[1] "one_1"   "two_2"   "three_3"

Text aus der Eingabe enthält häufig Leerzeichen um die Trennzeichen. trimws() entfernt die Leerzeichen am Anfang und Ende jedes Elements:

raw <- "  apples , pears,plums  "
items <- trimws(strsplit(raw, ",")[[1]])
print(items)
print(paste(rev(items), collapse = " | "))

Ausgabe:

[1] "apples" "pears"  "plums" 
[1] "plums | pears | apples"

strsplit() auf einem Vektor gibt ein Listenelement pro Zeichenkette zurück, sodass jede Eingabezeile ihre eigenen Teile behält:

lines <- c("a,b", "c,d,e")
parts <- strsplit(lines, ",")
print(length(parts))
print(parts[[2]])

Ausgabe:

[1] 2
[1] "c" "d" "e"