string_before <- "aaajohn bbbjohn cccjohn johnaaa johnbbb johnccc" string_after <- gsub("(\\S+)john", "\\1jane", string_before) string_after ## also gsub("\\Bjohn", "jane", string_before)
Standard input is empty
[1] "aaajane bbbjane cccjane johnaaa johnbbb johnccc" [1] "aaajane bbbjane cccjane johnaaa johnbbb johnccc"