annotate aim-mat/tools/@signal/linsigx.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 linsig=linsigx(sig)
tomwalters@0 17 % usage: linsig=linsigx(sig)
tomwalters@0 18 % transferes the signal from a signal that is in logarithmic scale
tomwalters@0 19 % to a signal, that is in linear scale.
tomwalters@0 20 % reverser operation from logsinx
tomwalters@0 21 %
tomwalters@0 22 % this is a little bit tricky since we cant take the times as measure for
tomwalters@0 23 % the logarithmic part. We therefore take the labels, which must be defined
tomwalters@0 24 % properly!
tomwalters@0 25
tomwalters@0 26 if length(sig.x_tick_labels) > 0
tomwalters@0 27 tmin=sig.x_tick_labels(1)/1000;
tomwalters@0 28 tmax=sig.x_tick_labels(end)/1000;
tomwalters@0 29 % tmin=sig.x_tick_labels(1);
tomwalters@0 30 % tmax=sig.x_tick_labels(end);
tomwalters@0 31 else
tomwalters@0 32 error('signal::linsig: definie x labels of signal');
tomwalters@0 33 end
tomwalters@0 34
tomwalters@0 35 nr_points=getnrpoints(sig);
tomwalters@0 36
tomwalters@0 37 oldvals=getvalues(sig);
tomwalters@0 38 newvals=zeros(nr_points,1);
tomwalters@0 39
tomwalters@0 40
tomwalters@0 41 % [ntimes,scaleinfo]=distributelogarithmic(tmin,tmax,nr_points);
tomwalters@0 42 ntimes=linspace(tmin,tmax,nr_points);
tomwalters@0 43 mtimes=f2f(ntimes,0.001,0.035,0.001,0.035,'loglin');
tomwalters@0 44 % mtimes=f2f(ntimes,tmin,tmax,tmin,tmax,'loglin');
tomwalters@0 45 newvals=gettimevalue(sig,mtimes);
tomwalters@0 46
tomwalters@0 47 sr=nr_points/(tmax-tmin);
tomwalters@0 48 linsig=signal(newvals,sr); % copy all values
tomwalters@0 49 linsig=setstarttime(linsig,tmin);
tomwalters@0 50
tomwalters@0 51