# your code goes herex <- "rti"sub("(\\S)$", "\\1 ", x)
Standard input is empty
[1] "rti "
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!