alternativahu.m

This is a case for recognition of hand gestures using the 7 Hu moments and neural network classifier

clc
clear all;
close all;
Z = zeros(12,8);
for i=1:4
    string = ['bien\der\' num2str(i) '.jpg'];
    Ima=imread(string);
    I=rgb2gray(Ima);
    K = imadjust(I);
    JU = im2bw(K,0.55);
    se = strel('disk',9);
    bw2 = imclose(JU,se);
    bw3 = imopen(bw2,se);
    [L,n] = bwlabel(bw3,4);
    HM = HuMom(L);
    Z(i,:) = [HM 1];
end
%mano izquierda
for i=1:4
    string = ['bien\izq\' num2str(i) '.jpg'];
    Ima=imread(string);
    I=rgb2gray(Ima);
    K = imadjust(I);
    JU = im2bw(K,0.55);
    se = strel('disk',9);
    bw2 = imclose(JU,se);
    bw3 = imopen(bw2,se);
    [L,n] = bwlabel(bw3,4);
    HM = HuMom(L);
    Z(i+4,:) = [HM 2];
end

%doble click
for i=1:4    
    string = ['bien\doble\' num2str(i) '.jpg'];
    Ima=imread(string);
    I=rgb2gray(Ima);
    K = imadjust(I);
    JU = im2bw(K,0.55);
    se = strel('disk',9);
    bw2 = imclose(JU,se);
    bw3 = imopen(bw2,se);
    [L,n] = bwlabel(bw3,4);
    HM = HuMom(L);
    Z(i+8,:) = [HM 3];
end

%%%%%%%%%%%%%%%%%%%%%%%
k1 = find(Z(:,8)==1);
k2 = find(Z(:,8)==2);
k3 = find(Z(:,8)==3);
%x=2;y=4 da buenos resultados
while(1)
    x = input('Momento de Hu eje x?');
    y = input('Momento de Hu eje y?');
    clf
    plot(Z(k1,x),Z(k1,y),'r*')
    hold on
    plot(Z(k2,x),Z(k2,y),'g+')
    plot(Z(k3,x),Z(k3,y),'bo')
end