fork download
copy 
  1. # => Define the variable with the [This's the "best" music] string
  2. message <- "This's the \"best\" music"
  3. message <-gsub("\"", "\\\"", gsub("\'", "\\\'", message, fixed=TRUE), fixed=TRUE)
  4. cat(message, sep="\n")
  5.  
  6. cat(gsub("([\"'])", "\\\\\\1", "This's the \"best\" music"), sep="\n")
Success #stdin #stdout 0.15s 175424KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
This\'s the \"best\" music
This\'s the \"best\" music
https://ideone.com/r0KRj1
language:
R (R 3.5.2)
created:
7 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!