Displaying 1 result from an estimated 1 matches for "op_matrici".
2006 Oct 13
3
Rmpi performance
...computational performance.
op_mat = function(mat) {
+ inv = solve(mat)
+ det_inv = det(inversa)
+ tr_inv = sum(diag(inversa))
+ return(list(c(det=det_inv,tr=tr_inv)))
+ }
>nn = 3000
>XX = matrix(rnorm(nn*nn),nn,nn)
# with the master
> system.time(op_matrici(XX))
[1] 42.283 1.883 44.168 0.000 0.000
# with the cluster
> system.time(clusterCall(cl,op_matrici,XX))
[1] 11.523 12.612 71.562 0.000 0.000
You can see that using the master it takes 44.168 seconds for computing
the function on matrix XX while it takes 71.562 seconds (more time!!!)
wit...