Skip to content

Instantly share code, notes, and snippets.

@andrie
Created October 16, 2014 11:34
Show Gist options
  • Star 2 You must be signed in to star a gist
  • Fork 1 You must be signed in to fork a gist
  • Save andrie/cc34e62ef6f546ef78b0 to your computer and use it in GitHub Desktop.
Save andrie/cc34e62ef6f546ef78b0 to your computer and use it in GitHub Desktop.
Source Simon Urbanek's benchmark v2.5 and capture total execution time
# Run Simon Urbanek's benchmark v2.5
cat("R version\n")
cat("=========\n")
print(R.version)
if(exists("Revo.version")) {
cat("Revo version")
cat("============")
print(Revo.version)
}
totalTestTime <- system.time({
source(url("http://r.research.att.com/benchmarks/R-benchmark-25.R"))
})
cat("Total test time:", totalTestTime[[3]], "seconds")
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment