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/07/17 10:58:38 $
tomwalters@0: % $Revision: 1.1 $
tomwalters@0: 
tomwalters@0: function sig=getfrequencyprofile(fr)
tomwalters@0: 
tomwalters@0: 
tomwalters@0: number=length(fr);
tomwalters@0: if number==1
tomwalters@0:     val=fr.values;
tomwalters@0:     sval=val';
tomwalters@0:     summe=sum(sval);
tomwalters@0: 
tomwalters@0:     cfs=fr.centerfrequencies;
tomwalters@0:     max_fre=max(cfs);
tomwalters@0:     
tomwalters@0:     sig=signal(summe);
tomwalters@0:     sig=setsr(sig,1);
tomwalters@0:     sig=setxlabels(sig,cfs);
tomwalters@0:     sig=setunit_x(sig,'Frequency(kHz)');
tomwalters@0:     sig=setname(sig,'Sum of Frequencies');
tomwalters@0: else
tomwalters@0:         not implemented yet
tomwalters@0: end
tomwalters@0: