annotate aim-mat/tools/@signal/getcenterofmass.m @ 0:74dedb26614d

Initial checkin of AIM-MAT version 1.5 (6.4.2011).
author tomwalters
date Fri, 20 May 2011 12:32:31 +0100
parents
children 20ada0af3d7d
rev   line source
tomwalters@0 1 % method of class @signal
tomwalters@0 2 %
tomwalters@0 3 % INPUT VALUES:
tomwalters@0 4 %
tomwalters@0 5 % RETURN VALUE:
tomwalters@0 6 %
tomwalters@0 7 %
tomwalters@0 8 % (c) 2003-2008, University of Cambridge, Medical Research Council
tomwalters@0 9 % Maintained by Tom Walters (tcw24@cam.ac.uk), written by Stefan Bleeck (stefan@bleeck.de)
tomwalters@0 10 % http://www.pdn.cam.ac.uk/cnbh/aim2006
tomwalters@0 11 % $Date: 2008-06-10 18:00:16 +0100 (Tue, 10 Jun 2008) $
tomwalters@0 12 % $Revision: 585 $
tomwalters@0 13
tomwalters@0 14 function w=getcenterofmass(sig)
tomwalters@0 15
tomwalters@0 16 vals=getvalues(sig);
tomwalters@0 17 nr=getnrpoints(sig);
tomwalters@0 18
tomwalters@0 19 su1=0;
tomwalters@0 20 su2=0;
tomwalters@0 21
tomwalters@0 22 for i=1:nr
tomwalters@0 23 su1=su1+vals(i)*i;
tomwalters@0 24 su2=su2+vals(i);
tomwalters@0 25 end
tomwalters@0 26
tomwalters@0 27 if su2~=0
tomwalters@0 28 w=su1/su2;
tomwalters@0 29 else
tomwalters@0 30 w=nr/2;
tomwalters@0 31 end
tomwalters@0 32