hardner: excellent, thanks for the info. I also hijacked some of your scripting above to add spec limits by group in a variability chart. I did have a few more questions:
1) How do I change the type and color of line used for the reference lines (i.e. dotted, dashed, etc.)
2) Using the addgraphicsscript function, is there a way to tell JMP which X subgroup to reference when drawing the length of the line (in the x-axis direction)? For example, the way I've scripted this I'm able to create the reference lines using "Run #" but what if I want use "Group" to define the length of the reference line?
3) If adding my own column property, I assume you're talking about column property --> Other....and then what? Just copy some scripting into the column property submenu? [Maybe this should be it's own thread if it doesn't already exist]
Thanks in advance!
Here is my test script for the table:
New Table( "Variability Spec Limits By Group Test_Data",
Add Rows( 15 ),
New Script(
"Variability Chart",
o = Variability Chart(
Y( :Parametric Response ),
X( :GROUP, :Run # ),
Max Iter( 100 ),
Conv Limit( 0.00000001 ),
Number Integration Abscissas( 128 ),
Number Function Evals( 65536 ),
Analysis Type( Name( "Choose best analysis (EMS REML Bayesian)" ) ),
Process Variation( 0 ),
Std Dev Chart( 0 ),
SendToReport(
Dispatch(
{"Variability Chart for Parametric Response"},
"2",
ScaleBox,
{Min( 8.92666666666667 ), Max( 15.35 ), Inc( 1 ),
Minor Ticks( 1 )}
)
)
);
r = o << report;
r[framebox( 1 )] << addgraphicsscript( Line( {0, 12}, {5, 12} ) );
r[framebox( 1 )] << addgraphicsscript( Line( {0, 14}, {5, 14} ) );
r[framebox( 1 )] << addgraphicsscript( Line( {5, 13}, {10, 13} ) );
r[framebox( 1 )] << addgraphicsscript( Line( {5, 15}, {10, 15} ) );
r[framebox( 1 )] << addgraphicsscript( Line( {10, 10.5}, {15, 10.5} ) );
r[framebox( 1 )] << addgraphicsscript( Line( {10, 13.5}, {15, 13.5} ) );
),
New Column( "GROUP",
Character( 4 ),
Nominal,
Set Selected,
Set Values(
{"1", "1", "1", "1", "1", "2", "2", "2", "2", "2", "3", "3", "3", "3",
"3"}
)
),
New Column( "Run #",
Numeric,
Continuous,
Format( "Best", 12 ),
Set Values( [1, 2, 3, 4, 5, 1, 2, 3, 4, 5, 1, 2, 3, 4, 5] )
),
New Column( "Parametric Response",
Numeric,
Continuous,
Format( "Best", 12 ),
Set Values(
[13.02, 13.05, 12.98, 12.62, 12.79, 13.9, 13.86, 14.1, 14, 13.99, 12.21,
12.56, 12.89, 11.3, 12]
)
),
Set Row States( [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0] )
)
Here is my test script for the graph:
o=Variability Chart(
Y( :Parametric Response ),
X( :GROUP, :Run # ),
Max Iter( 100 ),
Conv Limit( 0.00000001 ),
Number Integration Abscissas( 128 ),
Number Function Evals( 65536 ),
Analysis Type( Name( "Choose best analysis (EMS REML Bayesian)" ) ),
Process Variation( 0 ),
Std Dev Chart( 0 ),
SendToReport(
Dispatch(
{"Variability Chart for Parametric Response"},
"2",
ScaleBox,
{Min( 8.92666666666667 ), Max( 15.35 ), Inc( 1 ), Minor Ticks( 1 )}
)
)
);
r=o<<report;
r[framebox(1)]<<addgraphicsscript(line({0,12},{5,12}));
r[framebox(1)]<<addgraphicsscript(line({0,14},{5,14}));
r[framebox(1)]<<addgraphicsscript(line({5,13},{10,13}));
r[framebox(1)]<<addgraphicsscript(line({5,15},{10,15}));
r[framebox(1)]<<addgraphicsscript(line({10,10.5},{15,10.5}));
r[framebox(1)]<<addgraphicsscript(line({10,13.5},{15,13.5}));