procedure QCCapIndexes(const Data: TVec; const LB: Double; const UB: Double; out p: Double; out CP: Double; out CPK: Double; var CPConfInt: TDoubleArray; var CPKConfInt: TDoubleArray; Alpha: Double);
Process Capability indexes p, Cp and Cpk.
| # | Name | Description |
|---|---|---|
| 1 | Data | Process data. |
| 2 | LB | Lower specification limit. LB and UB are boundaries within which measurements on a product characteristic must lie. |
| 3 | UB | Upper specification limit. LB and UB are boundaries within which measurements on a product characteristic must lie. |
| 4 | Alpha | Desired significance level. |
| 5 | p | Returns calculated significance. |
| 6 | CP | Returns capability index. |
| 7 | CPConfInt | Returns 100*(1-Alpha) Cp confindence interval. |
| 8 | CPK | Returns capability index for uncentred process. |
| 9 | CPKConfInt | Returns 100*(1-Alpha) CPK confidence interval. |
Result: stored in self (calling object)
Remarks:
Calculates the Process Capability indexes p, Cp(aka CPR) and Cpk(AKA CPRk).
Examples
Uses StatControlCharts, MtxExp, Math387;
procedure Example;
var Data: Vector;
p, lb, ub,cp, cpk: double;
CPConfInt, CPKConfInt: TTwoElmReal;
begin
Data.LoadFromFile('PCDATA.vec');
QCCapIndexes(Data,lb,ub,p,cp,cpk,CPConfInt,CPKConfInt, 0.05);
end;