comparison m-toolbox/test/test_ao_scale.m @ 0:f0afece42f48

Import.
author Daniele Nicolodi <nicolodi@science.unitn.it>
date Wed, 23 Nov 2011 19:22:13 +0100
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:f0afece42f48
1 % A simple test script to test the ao/scale method
2 %
3 % M Hewitson
4 %
5 % $Id: test_ao_scale.m,v 1.2 2009/02/02 15:20:39 hewitson Exp $
6 %
7
8 mc
9
10 %% Make AOs
11
12 ts = ao(plist('tsfcn', 't.^2', 'fs', 10, 'nsecs', 1))
13 xy = ao(plist('xyfcn', 'sqrt(x)', 'x', 1:10))
14 fs = ao(plist('fsfcn', '1./f', 'f', 'logspace(-4,0,1000)'))
15 ca = ao(1:10)
16
17 %% Scale all of them
18
19 sts1 = ts.scale(plist('factor', 3))
20 sts2 = ts.scale(plist('factor', 3, 'yunits', 'Hz'))
21 sts3 = ts.scale(2, plist('yunits', 'Hz'))
22
23 tss = scale([sts1 sts2 sts3], plist('factor', 4))
24