x <- "\r\n\t\t\tExample\t\t\t"trimws(x)
Standard input is empty
[1] "Example"
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!