QCRChart Routine

Summary

Constructs R-Chart.

Declaration

Procedure QCRChart(Data: TMtx; DrawVec: TVec; out CL, UCL, LCL: TSample; Confidence: TSample = 0.997);

Parameter	Description
Data	Each Data row contains replicated observation taken at specific time.
Confidence	Confidence level for upper and lower control limit. Confidence must lie in the (0,1) interval.
DrawVec	Returns values to be drawn.
CL	Returns control Chart centerline.
UCL	Returns control Chart upper control limit.
LCL	Returns control Chart lower control limit.

Description

Calculates R-Chart drawing values, center line, upper and lower control limit.

See Also
TQCSeries
QCXChart
QCSChart

Example 1

The following code will create R chart:

  Uses StatSeries,StatControlCharts, MtxExp, Math387, MtxVecTee;
  procedure Example;
  var CL, UCL, LCL : TSample;
    Data: Matrix;
    DrawVec: Vector;
  begin
    Data.LoadFromFile('ewma_data.mtx');
    QCRChart(Data,DrawVec,CL,UCL,LCL,0.025);
    // setup limit lines
    Series1.UCL := UCL;
    Series1.LCL := LCL;
    Series1.CL := CL;
    // now draw actual data
    DrawValues(DrawVec,Series1);
  end;

  #include "StatSeries.hpp"
  #include "MtxVecTee.hpp"
  #include "MtxVecCpp.h"
  #include "StatControlCharts.hpp"
  #include "Math387.hpp"
  void __fastcall Example(TQCSeries* Series1);
  {
    Vector drawvec;
    Matrix data;
    double cl,lcl,ucl;
    data->LoadFromFile("data.mtx");
    QCRChart(data,drawvec,cl,ucl,lcl,0.025);
    Series1->UCL = ucl;
    Series1->LCL = lcl;
    Series1->CL = cl;
    DrawValues(drawVec,Series1,0,1,false);
  }

  using Dew.Math;
  using Dew.Math.Units;
  using Dew.Stats.Units;
  namespace Dew.Examples
  {
    private void Example()
    {
      Matrix Data = new Matrix(0,0);
      Vector DrawVec = new Vector(0);
      double cl,ucl,lcl;
      Data.LoadFromFile("data.mtx");
      StatControlCharts.QCRChart(Data,DrawVec,out cl, out ucl, out lcl, 0.025);
    }
  }