Create Octuv



clear all
fs = 44100;
t=(1/fs:1/fs:(2^10)/fs);

A = 440;
C = A*2^(1/4);
E = C*2^(1/3);

x = sin(2*pi*t*A) + sin(2*pi*t*C)  +sin(2*pi*t*E);

figure(1)
plot(t,x)

y = wavelet(x);

C = packwavelet(y);

figure(2)
pcolor(C)