컴퓨터는 잘못이 없다
system("cat /proc/", Sys.getpid(), "/status | grep VmSize")
system("free -g")
library(parallel)
parallel::detectCores()
parallel::detectCores(logical = FALSE)
정말로 이 계산이 필요한가?
C 혹은 C++로 바꾸자
반복문에 주의하자
idx <- order(distRN)[1:1]
top_dist <- distRN[idx]
top_dist <- distRN[which.min(distRN)]
Unlike most other R objects, environments are not copied when passed to functions or used in assignments.
total_dt <- ldply(1:nrow(data), function(x) {
...
}, .parallel = TRUE)
total_dt <- foreach(chunk = isplitVector(1:nrow(data), chunks=8), .combine = rbind) %dopar% {
dt <- foreach(x = chunk, .combine = rbind, .inorder = F) %do% {
...
}
return(dt)
}