Example 1

  procedure BarlettReport;
  var NumDim,i: Integer;
    SignifVec: Vector;
    Data: Matrix;
  begin
    // Barlett test for dimensionality
    Data.LoadFromFile('c:\temp\data.mtx'); // load test data
    BarlettTest(Data,NumDim,SignifVec); // Alpha = 5 %
    // returns NumDim and SignifVec
  end;

  #include "MtxVec.hpp"
  #include "MtxVecCpp.h"
  #include "Statistics.hpp"
  void __fastcall Example()
  {
    Matrix data;
    Vector signifVec;
    int numdim;
    data->LoadFromFile("c:\\temp\\data.mtx"); // load test data
    BarlettTest(data, numdim, signifVec,0.05); // Alpha = 5%
    // returns NumDim and SignifVec
  }

  using Dew.Math;
  using Dew.Stat.Units;
  namespace Dew.Examples
  {
    private void Example()
    {
      Matrix data = new Matrix(0,0);
      Vector signifVec = new Vector(0);
      data.LoadFromFile("c:\\temp\\data.mtx"); // load test data
      Statistics.BarlettTest(data, out numdim, signifVec, 0.05); // Alpha = 5%
      // returns numdim and signifVec
    }
  }