myStr <- "layout = (1,2,3,4) //lala(huhu)"gsub(".*?(\\([^()]*\\)).*", "\\1", myStr)
Standard input is empty
[1] "(1,2,3,4)"
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!