Algorithm::Evolutionary::Op::Mutation - BitFlip mutation, changes several bits in a bitstring, depending on the probability
use Algorithm::Evolutionary::Op::Mutation;
my $xmlStr=<<EOC; <op name='Mutation' type='unary' rate='2'> <param name='probability' value='0.5' /> </op> EOC my $ref = XMLin($xmlStr);
my $op = Algorithm::Evolutionary::Op::->fromXML( $ref ); print $op->asXML(), "\n*Arity ->", $op->arity(), "\n";
my $op = new Algorithm::Evolutionary::Op::Mutation (0.5 ); #Create from scratch
Algorithm::Evolutionary::Op::Base
Mutation operator for a GA
Creates a new mutation operator with a bitflip application rate, which defaults to 0.5, and an operator application rate (general for all ops), which defaults to 1.
Creates a new mutation operator with an application rate. Rate defaults to 0.5.
Called create to distinguish from the classwide ctor, new. It just makes simpler to create a Mutation Operator
Applies mutation operator to a ``Chromosome'', a bitstring, really. Can be
applied only to victims with the _str
instance variable;
it checks before application that the operand is of type
Algorithm::Evolutionary::Individual::BitString. It returns the victim.
This file is released under the GPL. See the LICENSE file included in this distribution, or go to http://www.fsf.org/licenses/gpl.txt
CVS Info: $Date: 2002/06/18 12:21:13 $ $Header: /cvsroot/opeal/opeal/Algorithm/Evolutionary/Op/Mutation.pm,v 1.3 2002/06/18 12:21:13 jmerelo Exp $ $Author: jmerelo $ $Revision: 1.3 $ $Name $