andre/blas-benchmarks
1
0
Fork 0
mirror of https://github.com/andre-wojtowicz/blas-benchmarks synced 2024-12-23 06:50:28 +01:00
Code Releases Activity

added sample benchmark

Browse Source
This commit is contained in:
Andrzej Wójtowicz 2016-04-29 14:13:49 +02:00
parent faf99ebc92
commit c3480c7b84
1 changed files with 16 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
sample-benchmark.R Normal file
View File

@ -0,0 +1,16 @@
library(checkpoint)
library(rbenchmark)
f = function()
{
set.seed (1)
m <- 1000
n <- 500
A <- matrix (runif (m*n),m,n)
# Matrix multiply
B <- crossprod(A)
}
benchmark(f(), replications=100)