Uses MtxExpr, StatTimeSerAnalysis, Series, TeEngine;
procedure Example(Series1,Series2: TLineSeries);
var ts,Mv: Vector;
  FirstIndex: Integer;
begin
  ts.LoadFromFile('testdata.vec');
  DrawValues(ts,Series1); // draw original time series
  MovingAverage(ts,12,Mv,FirstIndex,True);
  DrawValues(Mv,Series2,FirstIndex); // draw MA over original time series
end;

#include "MtxExpr.hpp"
#include "Math387.hpp"
#include "StatTimeSerAnalysis.hpp"
void __fastcall Example(TLineSeries* Series1, TLineSeries* Series2);
{
    sVector ts,Mv;
    int FirstIndex;

    ts.LoadFromFile("aerosol_particles.vec");
    DrawValues(ts,Series1,0.0,1.0); // draw original time series
    MovingAverage(ts,12,Mv,FirstIndex,true);
    DrawValues(Mv,Series2,FirstIndex,1.0); // draw MA over original time series
}