test tune function

Contents

C4

[y Fs] = tune(1);
fprintf('duration: %g fs %g kHz\n',length(y)/Fs,Fs*1e-3);
t = (1:length(y))/Fs;
subplot(2,1,1);
plot(t,y,'k');
xlabel('time (sec)');
ylabel('entire signal');
subplot(2,1,2);
tmin = 0.01;
idx = find(t>tmin & t<0.07);
plot((t(idx)-tmin)*1e3,y(idx),'k');
xlabel('time (msec)');
ylabel('zoom in');
duration: 0.25 fs 4 kHz

ode to joy

ode = [10 10 11 13 13 11 10 8 6 6 8 10 8 8];
[y Fs] = tune(ode);
subplot(1,1,1);
plot(y);

close encounters G A F (F) C

sp = [ 20 22 18 6 13 ];
[y Fs] = tune(sp);