tomwalters@0: % method of class @signal
tomwalters@0: % function [meansig,stdsig]=average(sig,[t_start],[t_stop])
tomwalters@0: % calculates the average value of the signal
tomwalters@0: %
tomwalters@0: %   INPUT VALUES:
tomwalters@0: %       sig:  original @signal
tomwalters@0: %       t_start: start time in seconds [0]
tomwalters@0: %       t_stop: stop time in seconds [getlength(sig)]
tomwalters@0: %    
tomwalters@0: %   RETURN VALUE:
tomwalters@0: %       meansig: mean value of the signal
tomwalters@0: %       stdsug: standart deviation
tomwalters@0: %
bleeck@3: % This external file is included as part of the 'aim-mat' distribution package
bleeck@3: % (c) 2011, University of Southampton
bleeck@3: % Maintained by Stefan Bleeck (bleeck@gmail.com)
bleeck@3: % download of current version is on the soundsoftware site: 
bleeck@3: % http://code.soundsoftware.ac.uk/projects/aimmat
bleeck@3: % documentation and everything is on http://www.acousticscale.org
bleeck@3: 
tomwalters@0: 
tomwalters@0: function [meana,stda]=average(sig,t_start,t_stop)
tomwalters@0: 
tomwalters@0: 
tomwalters@0: if nargin < 2
tomwalters@0:     t_start=getminimumtime(sig);
tomwalters@0: end
tomwalters@0: if nargin < 3
tomwalters@0:     t_stop=t_start+getlength(sig);
tomwalters@0: end
tomwalters@0: 
tomwalters@0: intstart=time2bin(sig,t_start);
tomwalters@0: intstop=time2bin(sig,t_stop);
tomwalters@0: 
tomwalters@0: if intstart==0
tomwalters@0:     intstart=1;
tomwalters@0: end
tomwalters@0: 
tomwalters@0: if intstart>intstop
tomwalters@0:     error('signal::average: stoptime < starttime');
tomwalters@0: end
tomwalters@0: 
tomwalters@0: 
tomwalters@0: s=sig.werte(intstart:intstop);
tomwalters@0: if max(size(s))>1
tomwalters@0:     meana=mean(s);
tomwalters@0:     stda=std(s);
tomwalters@0: else
tomwalters@0:     meana=s;
tomwalters@0:     stda=0;
tomwalters@0: end