annotate aim-mat/tools/@signal/setvalues.m @ 4:537f939baef0 tip

various bug fixes and changed copyright message
author Stefan Bleeck <bleeck@gmail.com>
date Tue, 16 Aug 2011 14:37:17 +0100
parents 20ada0af3d7d
children
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 %
bleeck@3 8 % This external file is included as part of the 'aim-mat' distribution package
bleeck@3 9 % (c) 2011, University of Southampton
bleeck@3 10 % Maintained by Stefan Bleeck (bleeck@gmail.com)
bleeck@3 11 % download of current version is on the soundsoftware site:
bleeck@3 12 % http://code.soundsoftware.ac.uk/projects/aimmat
bleeck@3 13 % documentation and everything is on http://www.acousticscale.org
bleeck@3 14
tomwalters@0 15
tomwalters@0 16 function sig=setvalues(org_sig,new_vals,startint)
tomwalters@0 17 %usage: sig=setvalues(si,new,vals)
tomwalters@0 18 % sets all values of the signal org_sig to the new values
tomwalters@0 19 % if only one value is given, than all vals are set to this value
tomwalters@0 20
tomwalters@0 21 if getnrpoints(org_sig)~=max(size(new_vals)) & nargin < 3
tomwalters@0 22 disp('error: setvalues: different size of signal and new values');
tomwalters@0 23 end
tomwalters@0 24
tomwalters@0 25 if nargin < 3
tomwalters@0 26 startint=1;
tomwalters@0 27 end
tomwalters@0 28
tomwalters@0 29 if length(new_vals)==1
tomwalters@0 30 len=getnrpoints(org_sig)-startint+1;
tomwalters@0 31 new_vals=ones(len,1)*new_vals;
tomwalters@0 32 end
tomwalters@0 33 if size(new_vals,1)< size(new_vals,2)
tomwalters@0 34 new_vals=new_vals';
tomwalters@0 35 end
tomwalters@0 36
tomwalters@0 37 len=size(new_vals,1);
tomwalters@0 38
tomwalters@0 39 nval=org_sig.werte;
tomwalters@0 40 nval(startint:startint+len-1)=new_vals;
tomwalters@0 41 org_sig.werte=nval;
tomwalters@0 42 sig=org_sig;
tomwalters@0 43