Reporte Proyecto PDS

%Procesamiento Digital de Señales
%Ing.Manuel Macario Munguia
%Jorge Aguirre Farias 11139530
%Jose Alberto Alonso Gonzalez 1235272
%%%PROCESAMIENTO DE UNA SEÑAL DE AUDIO EN DONDE INTRODUCIMOS UNASEÑAL DE
%%%AUDIO EN DONDE LA SEPARAMOS LOS CANALES EN DONDE SOLAMENTE TENIA EL
%%%CANAL R DESPUES RECORTAMOS LA SEÑAL DE AUDIO, INVERTIMOS LA SEÑAL
%%%,DIEZMAMOS LA SEÑAL Y LA ECUALIZAMOS%%%%%%%%1) paso se lee la señal con el comando “wavread” y poner la direccion de donde sta el archivo.se ejecuta el archivo con el comando “wavplay” y se grafica con el comando “plot” y se le aplica un titulocon el comando “title”.

%introduccion de señla de audio original
[x,fs]=wavread('/home/jafa/Música/RHCP3.wav');
wavplay(x,fs);%reproduccion de la señal original%
figure;
plot(x)%imagen original%title(['sonido original']);


el comando “specgram” permite analizar la variación de frecuencia en una señal en función del tiempo.
specgram(x,512,fs,512,212);

despues se separa la señal en un unicocanal para este tono y se grafica
%separacion de canales en este audio solamente tenemos el canal R%
canal_R=x(:,1);%el numero 1 indica el canal R&
%tiempo de la señal%
tiempo=size(x,1)/fs;
%ploteamosel canal R
x=0:1/fs:tiempo;
figure;
plot(x(2:end),canal_R);%ploteamos hasta la duracion de la señal&
title(['canalR']);
xlim([0,tiempo])

se recorta la señal y se grafica y se reproduce.
%recorte dela señal%
s_r=canal_R(1:10000);
wavplay(s_r,fs)
figure;
plot(s_r)
title(['recorte de la señal']);


se invierte la señal con la funcion “end:-1 a 1” se reproduce y se grafica
%inversion de la señal%s_inv=canal_R(end:-1:1);%desede el final hasta un paso de -1 hasta 1%
wavplay(s_inv,fs)
figure;
plot(s_inv)
title(['inversion de la señal']);


aqui se separa la señal con el comandoo mas bien secomprime, se reproduce y se grafica
%dieszmacion%
s_di=canal_R(1:3:end);
wavplay(s_di,fs/3); %se prierde calidad pero es mas liviana en bits%
figure;
plot(s_di)
title([' señal diezmada']);


aqui se...