fork download
copy 
  1. x <- "Red => Orange => Yellow blue => Grey,black"
  2. paste0("[ ", paste(strsplit(x, " => ", fixed=TRUE)[[1]], collapse=" ] => [ "), " ]") 
  3. paste0("[ ", gsub("\\s*=>\\s*", " ] => [ ", x), " ]")
Success #stdin #stdout 0.25s 38956KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
[1] "[ Red ] => [ Orange ] => [ Yellow blue ] => [ Grey,black ]"
[1] "[ Red ] => [ Orange ] => [ Yellow blue ] => [ Grey,black ]"
https://ideone.com/Z66MZg
language:
R (R 3.5.2)
created:
3 years ago
visibility:
secret

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!