%Representacion tridimensional de los coeficientes calculados aplicando
%la Transformada Wavelet Continua (CWT) de una señal estacionaria
%con contenido de 10, 25, 50 y 100 Hz
%
%Nota: para ejecutar este programa es necesario disponer del toolbox de 
%wavelet de Matlab 6

clear all
close all

npuntos=512;
t=0:1/npuntos:1;
w=2*pi;
tiempo=1000*t;
x=cos(w*10*t)+cos(w*25*t)+cos(w*50*t)+cos(w*100*t);
figure(1)
plot(tiempo,x)
coefs=cwt(x,1:32,'sym6');
figure(2)
mesh(abs(coefs))
