close all

hwSampleRate = 44100.0;
numSamples = 4096;

figure(1)

t = linspace(0,.5,numSamples);
n = linspace(-hwSampleRate/2,hwSampleRate/2,numSamples);
subplot(2,1,1)
plot(t,Large_Data);grid;
title('Whistling Sound');xlabel('Time (Seconds)');
subplot(2,1,2)
LARGE_DATA = abs(fftshift(fft(Large_Data)));
plot(n,LARGE_DATA);grid;
title('Whistling Spectrum');xlabel('Frequency (Hz)');
axis([-hwSampleRate/2,hwSampleRate/2,0,max(LARGE_DATA)]);

figure(2)
t = linspace(0,.5,numSamples);
n = linspace(-hwSampleRate/2,hwSampleRate/2,numSamples);
subplot(2,1,1)
plot(t,Song_Data);grid;
title('Actual Song');xlabel('Time (Seconds)');
subplot(2,1,2)
SONG_DATA = abs(fftshift(fft(Song_Data)));
plot(n,SONG_DATA);grid;
title('Song Spectrum');xlabel('Frequency (Hz)');
axis([-hwSampleRate/2,hwSampleRate/2,0,max(SONG_DATA)]);