Open tobigithub opened 8 years ago
caret_6.0-70 and R version 3.3.1
method <- c( "bag") # ------------------------------------------------------------------------- # FIRST sequential code (not parallel one CPU core): # ------------------------------------------------------------------------- require(caret); data(BloodBrain); set.seed(123) fit1 <- train(bbbDescr, logBBB, method); fit1 # ------------------------------------------------------------------------- # SECOND parallel register 4 cores (no worries if you only have 2) # train the caret model in parallel # ------------------------------------------------------------------------- library(doParallel); cl <- makeCluster(4); registerDoParallel(cl) require(caret); data(BloodBrain); set.seed(123) fit1 <- train(bbbDescr, logBBB, method); fit1 stopCluster(cl); registerDoSEQ(); ### END
caret_6.0-70 and R version 3.3.1