#### Load data
data(Pm_Pisco)
data(alphaGA_SPI3)
data(betaGA_SPI3)
#### Computing SPI with Genetic Algorithms
Pmon<-Pm_Pisco
Param_Alpha <- alphaGA_SPI3
Param_Beta <- betaGA_SPI3
SPIFromParameters(Pmon, scale =3, Param_Alpha, Param_Beta)
Run the code above in your browser using DataLab