x <- c("1529 33ER TAXI AG", "2384 4EYES GMBH")gsub("^(\\d+)([[:space:]])(.+)$","\\3",x)
Standard input is empty
[1] "33ER TAXI AG" "4EYES GMBH"
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!