library(formatR)
## evaluate simple code as a character vector
tidy_eval(text = c("a<-1+1;a", "matrix(rnorm(10),5)"))
## evaluate a file
tidy_eval(file.path(system.file(package = "stats"), "demo", "nlm.R"))
Run the code above in your browser using DataLab