Mercurial > hg > ltpda

view m-toolbox/test/test_mean.m @ 35:4be5f7a5316f database-connection-manager

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Suppress output messages on preferences loading and saving
author Daniele Nicolodi <nicolodi@science.unitn.it>
date Mon, 05 Dec 2011 16:20:06 +0100
parents f0afece42f48
children
line wrap: on
line source

% Test mean() operator for AOs.
%
% M Hewitson 19-04-07
%
% $Id: test_mean.m,v 1.11 2009/02/02 15:20:39 hewitson Exp $
%
function test_mean()
  
  
  % Make test AOs
  
  nsecs = 10;
  fs    = 1000;
  
  pl = plist('nsecs', nsecs, 'fs', fs, 'tsfcn', '10 + sin(2*pi*7.433*t) + randn(size(t))');
  
  a1 = ao(pl);
  a1 = a1.setName('a1')
  
  % Take abs
  a2 = mean(a1)
  a3 = a1 - a2;
  
  % Plot
  iplot(a1, a3)
  
end

% END