Ciao a tutti,
Sto creando un grafico a P di Laney con JMP 16.2. (So che questo grafico è disponibile con la nuova versione di JMP, tuttavia non ho questa nuova versione).
Non so perché ma quando ho meno di 10 valori, la scala X non è adattata.
La scala X è impostata per 10 valori (qualunque sia il numero di valori se è inferiore a 10), e quando ho più di 10 valori la scala X viene adattata.
Ecco il mio programma
z_yyy = Eval( {:"Y"n} );
z_xx = z_yyy[1] << get values;
z_nnn = Eval( {:Nombre de seringue transmise par le remplissage} );
z_nn = z_nnn[1] << get values;
z_rrr = Eval( {:Numéro de lot} );
z_Proportion = E Div( z_xx, z_nn );
z_Pbar = V Sum( z_xx ) / V Sum( z_nn );
z_sigma_est = Root( z_Pbar * (1 - z_Pbar) );
z_zvalue = E Mult( ((z_Proportion - z_Pbar) / z_sigma_est), Root( z_nn ) );
z_nr = N Row( z_zvalue );
z_mRList = {0};
z_m = z_zvalue;
z_m[1, 0] = [];
z_m = z_m |/ [0];
z_mr = Abs( z_m - z_zvalue );
z_nr = N Row( z_mr );
z_mr[z_nr, 0] = [];
z_SigmaZ = Mean( z_mr ) / 1.128;
z_KSigmaZ = 3 * z_SigmaZ;
Names Default To Here( 1 );
Graph_expr=Expr(
graph1 = Control Chart(
Sample Label( :X ),
Sample Size( :Y2 ),
KSigma(TBD),
Sort by Row Order( 1 ),
Chart Col( :"Y"n, P( Test Beyond Limits( 1 ), Limits Precision( 1 ) ) ),
SendToReport(
Dispatch(
{},
"Y",
OutlineBox,
{Set Title( "Carte de controle P'" )}
),
Dispatch(
{"Y"},
"2",
ScaleBox,
{Format( "Fixed Dec", 12, 5 ), Min( -0.05 ), Max( 1.05 ), Inc( 0.1 ),
Minor Ticks( 9 )}
),
Dispatch(
{"Y"},
"1",
ScaleBox,
{Min( 0.5 ), Inc( 1 ), Minor Ticks( 0 )}
),
Dispatch(
{"Y"},
"",
AxisBox,
{Add Axis Label( "XX" )}
)
)));
SubstituteInto(Graph_expr, Expr(TBD), z_KSigmaZ);
Graph_expr;
);
)Qualcuno ha un suggerimento per aiutarmi?
Grazie
Sebastiano
