Package check result: ERROR

Check: CRAN incoming feasibility, Result: NOTE
  Maintainer: ‘Irantzu Barrio <irantzu.barrio@ehu.eus>’
  
  Days since last update: 4

Check: examples, Result: ERROR
  Running examples in ‘CatPredi-Ex.R’ failed
  The error most likely occurred in:
  
  > base::assign(".ptime", proc.time(), pos = "CheckExEnv")
  > ### Name: compare.AUC.ht
  > ### Title: A bootstrap-based hypothesis test to select the best number of
  > ###   categories for a continuous predictor variable in a logistic
  > ###   regression model
  > ### Aliases: compare.AUC.ht
  > 
  > ### ** Examples
  > 
  > library(CatPredi)
  > set.seed(127)
  > #Simulate data
  >   n = 100
  >   #Predictor variable
  >   xh <- rnorm(n, mean = 0, sd = 1)
  >   xd <- rnorm(n, mean = 1.5, sd = 1)
  >   x <- c(xh, xd)
  >   #Response
  >   y <- c(rep(0,n), rep(1,n))
  >   # Data frame
  >   df <- data.frame(y = y, x = x)
  > ## No test: 
  >    
  >   # Select 2 optimal cut points using the AddFor algorithm. Correct the AUC
  >   res.addfor.k2 <- catpredi(formula = y ~ 1, cat.var = "x", cat.points = 2, 
  +   data = df, method = "addfor", range=NULL, correct.AUC=TRUE, 
  +   control=controlcatpredi(grid=20))
  >   # Select 3 optimal cut points using the AddFor algorithm. Correct the AUC
  >   res.addfor.k3 <- catpredi(formula = y ~ 1, cat.var = "x", cat.points = 3, 
  +   data = df, method = "addfor", range=NULL, correct.AUC=TRUE, 
  +   control=controlcatpredi(grid=20))
  >   comp <-  comp.cutpoints(res.addfor.k2, res.addfor.k3, V = 10)
  > ## End(No test)
  > ## No test: 
  >  
  >   # Select 1 optimal cut points using the BackAddFor algorithm. 
  >   res.backaddfor.k1 <- catpredi(formula = y ~ 1, cat.var = "x", cat.points = 1, 
  +   data = df, method = "backaddfor", range=NULL, correct.AUC=FALSE)
  >   # Select 2 optimal cut points using the BackAddFor algorithm. 
  >   res.backaddfor.k2 <- catpredi(formula = y ~ 1, cat.var = "x", cat.points = 2, 
  +   data = df, method = "backaddfor", range=NULL, correct.AUC=FALSE)     
  >   # Test if k=1 cut-off points is enough to categorise x
  >   comp.k1.k2 <-  compare.AUC.ht(res.backaddfor.k1, res.backaddfor.k2)
  Error in .check_ncores(cores) : 31 simultaneous processes spawned
  Calls: compare.AUC.ht ... %dopar% -> <Anonymous> -> mclapply -> .check_ncores
  Execution halted