R gsub alles nach leer

Ich denke, Sie haben führende / nacheilende Leerzeichen aus der 'Valeur'-Ausgabe. Wir können diese mit entfernen gsub. Wir passen ein oder mehrere Leerzeichen vom Anfang des Strings ( ^\\s+) oder ( |) am Ende des Strings ( \\s+$) an und ersetzen durch ''.

valeur1 <- gsub('^\\s+|\\s+$', '', valeur)

Wenn wir die ersten Nicht-Leerzeichen benötigen, passen wir das Leerzeichen ( \\s+) gefolgt von Nicht-Leerzeichen ( \\S+) bis zum Ende der Zeichenfolge an und ersetzen es durch ''.

sub('\\s+\\S+$', '', valeur1)
#[1] "8:01"  "17:46" NA      NA      NA      NA      "8:01"  "17:46"

Um die letzten Nicht-Leerzeichen subzu erhalten, müssen Sie ein oder mehrere Zeichen, die kein Leerzeichen ( \\S+) sind, vom Anfang der Zeichenfolge ('^') gefolgt von einem oder mehreren Leerzeichen ( \\s+) abgleichen und durch ''das letzte ersetzen , um das letzte zu erhalten Nicht-Leerzeichen.

sub('^\\S+\\s+', '', valeur1)
#[1] "8:15"  "18:00" NA      NA      NA      NA      "8:15"  "18:00"

Dies kann in einem einzigen Schritt erfolgen, bei dem am Anfang ( ^\\s*) oder ( |) ein oder mehrere Leerzeichen ( \\s+), gefolgt von einem oder mehreren Nicht-Leerzeichen ( \\S+), gefolgt von null oder mehreren Leerzeichen, null oder mehr Leerzeichen übereinstimmen am Ende ( \\s*$) und ersetzen durch ''.

 gsub("^\\s*|\\s+\\S+\\s*$","",valeur)
 #[1] "8:01"  "17:46" NA      NA      NA      NA      "8:01"  "17:46"

Oder eine andere Option ist stri_extract_firstoder stri_extract_lastvon library(stringi)wo aus wir ein oder mehrere Nicht-Leerzeichen am Anfang oder Ende abgleichen.

 library(stringi)
 stri_extract_first(valeur, regex='\\S+')
 #[1] "8:01"  "17:46" NA      NA      NA      NA      "8:01"  "17:46"

Für die lastNicht-Leerzeichen

 stri_extract_last(valeur, regex='\\S+')
 #[1] "8:15"  "18:00" NA      NA      NA      NA      "8:15"  "18:00"