fork download
  1. string <- "function(data, x = !!rlang::sym(\"Time1\"), y = !!rlang::sym(\"YVAR\")), values = c(\"a\", \"b\"))"
  2. cat(gsub('!!rlang::sym\\("([^"]+)"\\)', "\\1", string))
Success #stdin #stdout 0.26s 39332KB
stdin
Standard input is empty
stdout
function(data, x = Time1, y = YVAR), values = c("a", "b"))