Skip to content

Instantly share code, notes, and snippets.

View j-martens's full-sized avatar

j-martens j-martens

  • Microsoft
  • Anywhere
View GitHub Profile
@j-martens
j-martens / urbanek-benchmark-25.R
Created July 13, 2015 16:25
MKL Performance Benchmark 2
# 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)
@j-martens
j-martens / mkl-benchmark-rro.R
Last active August 29, 2015 14:24
MKL Performance Benchmark 1
# Set MKL threads if Revolution R Open or Revolution R Enterprise is available
if(require("RevoUtilsMath")){
setMKLthreads(4)
}
# Initialization
set.seed (1)