Scrierea codului R eficient
Colin Gillespie
Jumping Rivers & Newcastle University
library("parallel")
apply() este similar cu o buclă for
O matrice cu 10 coloane și 10.000 de rânduri:
m <- matrix(rnorm(100000), ncol = 10)
apply este mai ordonat decât o buclă forres <- apply(m, 1, median)
parApply()library("parallel")
copies_of_r <- 7
cl <- makeCluster(copies_of_r)
parApply(cl, m, 1, median)
stopCluster(cl)
Cum spunea Lewis Carroll:
Cu cât mă grăbesc mai tare, cu atât rămân mai în urmă.
# Versiunea serială
apply(m, 1, median)
# Versiunea paralelă
parApply(cl, m, 1, median)
Scrierea codului R eficient