%filters data and plots spectrogram for 64 electrode array
%requires raw data and sampling frequency

function [data] = Spectrogram( wave );

data = (wave(:,2:8));
%data = wave;
%wave(1,:)=0;

figure
specgram(data(:,1),1024,1000,hanning(256),220); axis([0 10 0 100]);

figure
for n=1:7
subplot(4,2,n); specgram(data(:,n),1024,1000,hanning(256),220); axis off; grid on; axis([0 10 0 100]); 
end