tomwalters@0: % method of class @frame
tomwalters@0: % 
tomwalters@0: %   INPUT VALUES:
tomwalters@0: %  
tomwalters@0: %   RETURN VALUE:
tomwalters@0: %
tomwalters@0: % 
tomwalters@0: % (c) 2003, University of Cambridge, Medical Research Council 
tomwalters@0: % Stefan Bleeck (stefan@bleeck.de)
tomwalters@0: % http://www.mrc-cbu.cam.ac.uk/cnbh/aimmanual
tomwalters@0: % $Date: 2003/01/17 16:57:46 $
tomwalters@0: % $Revision: 1.3 $
tomwalters@0: 
tomwalters@0: function sig=getsinglechannel(fr,nr)
tomwalters@0: 
tomwalters@0: channel_data=fr.values(nr,:);
tomwalters@0: sig=signal(channel_data);
tomwalters@0: 
tomwalters@0: 
tomwalters@0: sig=setsr(sig,fr.samplerate);
tomwalters@0: sig=setstarttime(sig,fr.start_time);
tomwalters@0: sig=setunit_x(sig,'interval (ms)');
tomwalters@0: 
tomwalters@0: cfs=getcf(fr);
tomwalters@0: mycf=cfs(nr);
tomwalters@0: 
tomwalters@0: if mycf<1000
tomwalters@0:     sig=setname(sig,sprintf('Channel %d - CF: %4.0f Hz',nr,mycf));
tomwalters@0: else
tomwalters@0:     sig=setname(sig,sprintf('Channel %d - CF: %2.2f kHz',nr,mycf/1000));
tomwalters@0: end