# \donttest{
library("EEML")
Actual<- as.ts(rnorm(200,100,50))
Model1<- as.ts(rnorm(200,100,50))
Model2<- as.ts(rnorm(200,100,50))
Model3<- as.ts(rnorm(200,100,50))
DF <- cbind(Actual, Model1,Model2,Model3)
SelModel<-Weight(ModelSel=DF,Optim="PSO")
# }
Run the code above in your browser using DataLab