Adding calculated columns to the Process Screening summary table with JSL

Evan_Morris

I swear I saw a post somewhere where someone was directly adding calculated columns to the process screening summary, and I was wanting to do that.

 

The specific column I wanted to add would be just a difference between the Specified Sigma and the Within Sigma, although if I can add one it won't be long before I want to add quite a few more...

 

Anyways, anyone know how to programmatically add additional calculated columns, or if that is possible?

ih

This might be the post you referred to.  I am still looking for a better way make sure the table sorts correctly when adding the new column, but it does the job: Process Variable Drift or Creep Detection 

names default to here(1);
dt = Open("$Sample_Data/iris.jmp");

//Open Process Screening with drift summaries
ps = dt << Process Screening(
	Y( :Sepal length, :Sepal width, :Petal length, :Petal width ),
	Control Chart Type( "Indiv and MR" ),
	Drift Summaries( 1 )
);

//Add a dummy column and use set values to reset the table order
ncb = (ps << XPath( "//TableBox" )) << Append( newCol = NumberColBox("Delete Me", {}));
newCol << Set Values({});
newCol << Delete Box;

//calculate the difference in sigmas
WithinSigma = (ps << XPath( "//NumberColBox[NumberColBoxHeader[text()='Within Sigma']]" ))[1] << Get;
SpecifiedSigma = (ps << XPath( "//NumberColBox[NumberColBoxHeader[text()='Overall Sigma']]" ))[1] << Get;
SigmaDifference = Matrix(WithinSigma) - Matrix(SpecifiedSigma);

//Add column to table with difference in sigma
ncb = (ps << XPath( "//TableBox" )) << Append( NumberColBox("Sigma Difference", SigmaDifference) );