Laboratorio 4: Procesamiento Avanzado de Señales
Enviado por acua95 • 20 de Octubre de 2015 • Trabajos • 990 Palabras (4 Páginas) • 193 Visitas
Laboratorio #4: Procesamiento Avanzado de Señales
Integrantes:
David Tamariz Carrion
Diego Navidad
Eder Ramos
%% Procesamiento de imagen de reconocimiento de color del semáforo
% Imagen a color
% Imágenes
clc;
clear all, close all
disp('');
disp('Procesamiento de imágenes: Reconocimiento de colores del semáforo');
n=input('Seleccione la opción: ');
disp('');
switch n
case 1
Ro = imread('semaforo_rojo.jpg');
size(Ro);
figure(1)
subplot(141), image(Ro) % Imagen a color
% Conversión a gris
Y1 = rgb2gray(Ro);
umbral1 = 50;
a = Y1 >= umbral1;
colormap(gray(256))
subplot(142), image(Y1) % Imagen en escala de grises
subplot(143), image(a*255) % Imagen binarizada
% Definición del Elemento Estructurante (EE)
EE = strel('disk',5);
Ae1 = imdilate( a*255 , EE );
Ad1=imerode(Ae1,EE);
colormap(gray(256))
subplot(144), image(Ad1)
R1=rot90(Ad1);
T1=255-R1;
D1=T1/255;
sum(D1);
D1=sum(D1);
if D1(1:73)==0
disp('Luz Roja');
else
disp('No se reconoce luz')
end
case 2
Am = imread('semaforo_ambar.jpg');
size(Am);
figure(1),
subplot(141), image(Am) % Imagen a color
% Conversión a gris
Y2 = rgb2gray(Am);
umbral2 = 50;
b = Y2 >= umbral2;
colormap(gray(256))
subplot(142), image(Y2) % Imagen en escala de grises
subplot(143), image(b*255) % Imagen binarizada
% Definición del Elemento Estructurante (EE)
EE = strel('disk',5);
Ae2 = imdilate( b*255 , EE );
Ad2=imerode(Ae2,EE);
colormap(gray(256))
subplot(144), image(Ad2)
R2=rot90(Ad2);
T2=255-R2;
D2=T2/255;
sum(D2);
D2=sum(D2);
if D2(73:106)==0
disp('Luz Ambar');
else
disp('No se reconoce luz')
end
case 3
Ve = imread('semaforo_verde.jpg');
size(Ve);
figure(1)
...