xegaGaGene (version 1.0.0.6)

newCrossMut2PipelineG: Converts two genes into a pipeline embedded in a gene with crossover and mutation for both kids.

Description

The embedded pipeline is evaluate(accept((crossover o mutation), gene, gene1)). Mutation is applied to both kids.

Usage

newCrossMut2PipelineG(g, g1)

Value

A gene with embedded genetic operator pipeline with crossover with two kids and mutation on both kids. The argument lF of the function $Pipeline()

configures the behavior of the pipeline.

Arguments

g

A gene.

g1

A gene.

See Also

Other Genetic Operator Pipelines in Gene: newCross2Mut1PipelineG(), newCross2Mut2PipelineG(), newCross2PipelineG(), newCrossMutPipelineG(), newCrossPipelineG(), newMutPipelineG(), newPipelineG()

Examples

lFxegaGaGene$CrossGene<-xegaGaCross2Gene
lFxegaGaGene$MutationRate<-function(fit, lF) {0.5}
lFxegaGaGene$BitMutationRate1<-function(fit, lF) {0.2}
lFxegaGaGene$CrossRate<-function(fit, lF) {0.5}
lFxegaGaGene$Accept<-function(OpPipeline, gene, lF) {OpPipeline(gene, lF)}
g<-xegaGaInitGene(lFxegaGaGene)
g1<-xegaGaInitGene(lFxegaGaGene)
a<-newCrossMut2PipelineG(g, g1)
print(a)
a$Pipeline(a, lFxegaGaGene)