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