tests/systemR.R

library("R.utils")

message("*** systemR() ...")

res <- systemR('--slave -e "cat(runif(1))"', intern=TRUE, verbose=TRUE)
cat("A random number: ", res, "\n", sep="")

message("*** systemR() ... DONE")
HenrikBengtsson/R.utils documentation built on March 7, 2024, 9:37 a.m.