Permutation - permutation, permute several atoms, depending on the probability
my $xmlStr=<<EOC; <op name='Permutation' type='unary' rate='2'> <param name='probability' value='0.5' /> </op> EOC my $ref = XMLin($xmlStr);
my $op = OpBase->fromXML( $ref ); print $op->asXML(), "\n*Arity ->", $op->arity(), "\n";
my $op = new Permutation (0.5 ); #Create from scratch with 0.5 probability
Permutation operator for a GA
Creates a new permutation 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 Permutation Operator
Sets the instance variables. Takes a ref-to-hash as input
Applies permutation operator to a ``Chromosome''. Can be applied to any victims.
Prints as XML, following the EvoSpec 0.2 XML specification. Should be called from derived classes, not by itself.
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/04/23 12:33:47 $ $Header: /cvsroot/opeal/opeal/Permutation.pm,v 1.5 2002/04/23 12:33:47 jmerelo Exp $ $Author: jmerelo $ $Revision: 1.5 $