clasificador.m

Diversos ejemplos sobre la aplicacion de algoritmos geneticos.

%% generacion de los datos
clear all; close all
global K1 K2

% K2: number of data;
K2 = 10; 
% m; slope of the line
m=-1;
% Se generan los datos
 [orig,w]= generadatos(K2,m);
 
% g(x) = 0.5(1-m)+mx-y=w(1) + w(2)*x + w(3)*y 
data = orig(1:2,:);
[dos N]=size(data);
data1 = [ones(1,N); data];

%% Definicion de los parametros del algoritmo
lchrom  = 45;        % long. del cromosoma
popsize = 50;        % tama駉 de la poblacion
pcross  = 0.65;      % prob.de crossover
pmutation = 0.001;   % prob. de mutacion
%elitismo = 0       % 0 sin elitismo, 1 si
maxgen   = 20;       % maxima cantidad de generaciones

%% Construir la poblacion inicial

% poblacion inicial
Pop = round(rand(lchrom,popsize));

%% Adaptacion de la poblacion inicial
Fenotipos = CromToPesos(Pop);

distancias = Fenotipos'*data1; 

clases = orig(3,:)';
bienClasificado = sign(distancias*clases);

[mal,midx]= find(bienClasificado==-1);

Fitness = min(abs(distancias),[],2);
Fitness(midx) = 0;