# NOT RUN {
library(ALL)
data(ALL)
demoALL<-ALL[1:12,1:8]
set.seed(1234)
population<-InitialPopulation(demoALL, 4, 9)
individuals<-Individuals(population)
individuals
set.seed(123)
pointMutation(individuals, 4)
# }
Run the code above in your browser using DataLab