Ersetzen Sie ganze Strings basierend auf partieller Übereinstimmung

Question

Neu in R. Suchen, um die gesamte Zeichenfolge zu ersetzen, wenn es eine teilweise Übereinstimmung gibt.

d = c("SDS0G2 Blue", "Blue SSC2CWA3", "Blue SA2M1GC", "SA5 Blue CSQ5") 

gsub("Blue", "Red", d, ignore.case = FALSE, fixed = FALSE) 

Ausgang: "SDS0G2 Red" "Red SSC2CWA3" "Red SA2M1GC" "SA5 Red CSQ5"

gewünschte Ausgabe: „Red“ „Red“ „Red“ „Red“

Jede Hilfe bei der Lösung dieses Problems wird sehr geschätzt.

Answer 1

würde ich mit grepl schlagen die Indizes zu finden und diese Indizes mit „Red“ ersetzen:

d = c("SDS0G2 Blue", "Blue SSC2CWA3", "Blue SA2M1GC", "SA5 Blue CSQ5", "ABCDE") 
d[grepl("Blue", d, ignore.case=FALSE)] <- "Red" 
d 
# [1] "Red" "Red" "Red" "Red" "ABCDE"