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
|