On NFS file systems it is sometimes not obvious what things you have to close. The best way to avoid this is to use the –no-lock argument on the command line, i.e.: R CMD INSTALL –no-lock <pkg> From within R, you can do this from within your command using: install.packages(“Rcpp”, dependencies = TRUE, INSTALL_opts=”–no-lock”)
Well there is the good old Use the source, Luke! — R itself has plenty of (very efficient) C code one can study, and CRAN has hundreds of packages, some from authors you trust. That provides real, tested examples to study and adapt. But as Josh suspected, I lean more towards C++ and hence Rcpp. … Read more
Biggest problem and root of ineffectiveness is indexing data.frame, I mean all this lines where you use temp[,]. Try to avoid this as much as possible. I took your function, change indexing and here version_A dayloop2_A <- function(temp){ res <- numeric(nrow(temp)) for (i in 1:nrow(temp)){ res[i] <- i if (i > 1) { if ((temp[i,6] … Read more