view m-toolbox/test/test_lincom_cdata.m @ 4:e3c5468b1bfe
database-connection-manager
Integrate with LTPDAPreferences
author
Daniele Nicolodi <nicolodi@science.unitn.it>
date
Mon, 05 Dec 2011 16:20:06 +0100 (2011-12-05)
parents
f0afece42f48
children
line source
+ − % Test script for ltpda_lincom.
+ − %
+ − % M Hewitson 14-02-07
+ − %
+ − % $Id: test_lincom_cdata.m,v 1.14 2009/02/02 15:20:38 hewitson Exp $
+ − %
+ − function test_lincom_cdata()
+ −
+ −
+ − % Make test AOs
+ − nsecs = 10;
+ − fs = 1000;
+ −
+ − pl = plist();
+ − pl.append('nsecs', nsecs);
+ − pl.append('fs', fs);
+ − pl.append('tsfcn', 'sin(2*pi*7.433*t) + randn(size(t))');
+ −
+ − a1 = ao(pl);
+ − a2 = ao(pl);
+ − a3 = ao(pl);
+ − a4 = ao(pl);
+ −
+ −
+ − % Make a cdata AO with the coefficients in
+ − b = ao([1 2 3]);
+ −
+ − %% Make linear combination
+ − c = lincom(a1, a2, a3, b);
+ −
+ − iplot(c)
+ − plot(c.hist)
+ −
+ − % Reproduce from history
+ − a_out = rebuild(c);
+ −
+ − iplot(a_out)
+ − plot(a_out.hist)
+ −
+ − end
+ − % END