On 16.01.2013 17:13, David Zamora Ávila wrote:
Hi R-Core,

i am using nnet and DEoptim,

Xcc=matrix(rnorm(100,0.5,0.08),50,2)
Ycr=matrix(rnorm(50,0.2,0.05),50,1)


pred_regm1 <- function(A) {
   A1=A[1]
   A2=A[2]
   A3=A[3]
   regm1 <-
nnet(Xcc,Ycr,entropy=T,size=A1,decay=A2,maxit=2000,trace=F,Hess=T,rang=A3,skip=T)
   dif=sum((predict(regm1,Xcc)-Ycr)^2)
   return(dif)
}

somar=DEoptim(pred_regm1,c(1,0.00001,0.01), c(25,0.999,0.95),
               control = DEoptim.control(steptol=25,trace =
FALSE,itermax=500,parallelType=1))


but implemented parallel process, i have next error:

Error en checkForRemoteErrors(val) :   4 nodes produced errors; first
error: could not find function "nnet"

how I can solve my mistake?


Load nnet on all the nodes, not only on the master.

Best,
Uwe Ligges







Thanks and kind regards



______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.


______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to