text <- c("blah blah \\index{words}words ramble on", "more blah more blah\\index{space words} space words ramble on","final blah\\textbf{bold words} ramble on")gsub("\\\\index\\{(\\w+(?:\\s+\\w+){0,4})\\}","\\\\textbf{\\1}", text)
Standard input is empty
[1] "blah blah \\textbf{words}words ramble on" [2] "more blah more blah\\textbf{space words} space words ramble on" [3] "final blah\\textbf{bold words} ramble on"
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!