Agregar línea de referencia al diagrama de distribuciónHola,
Quiero agregar una línea de referencia en las parcelas de distribución.
Los valores de referencia se almacenan en el segundo archivo "Tabla de datos de referencia"
Aquí está mi código: no funciona en gráficos de histograma, pero funciona en gráficos Var. Cualquier consejo sería apreciado
Names Default To Here( 1 );
dt1 = Data table( "Reference data table.jmp");
dt2 = Current Data Table();
Col_List = dt2 << Get Column Group( "Tests" );
vc2 = Eval(
Eval Expr(
dt2 << distribution(
Stack( 1 ),
Column( Expr( Col_List ) ),
Horizontal Layout( 1 ),
Normal Quantile Plot( 1 ),
Vertical( 1 ),
Process Capability( 0 )
)
)
);
aa_refs = Associative Array( dt1:Tests << get values, dt1:Mean << get values );
For( i = 1, i <= N Items( Col_List ), i++,
If( Contains( aa_refs, Col_List[i] ),
Report( vc2[i] )[Framebox( 1 )] << DispatchSeg( CustomStreamSeg( 3 ), {Line Width( 2 )} );
Report( vc2[i] )[AxisBox( 1 )] << {Add Ref Line( aa_refs[Col_List[i]], "Solid", "Green", "RTS", 2 )};
)
);
secuencias de comandosRe: Agregar línea de referencia a la gráfica de distribución@txnelson ¿alguna sugerencia?
Re: Agregar línea de referencia a la gráfica de distribuciónAquí hay una reelaboración de su guión.El problema que tiene es que el árbol de visualización para bivariado es diferente de la salida del árbol de visualización de los gráficos de varianza.Debe leer la sección de la Guía de secuencias de comandos sobre árboles de visualización para poder trabajar con las diversas formas de la salida.Además, los medios de su tabla de referencia parecen estar equivocados.Vea la salida a continuación.La media para Current 1.1 se enumera como 166 y el máximo enumerado es solo 2.49.
Names Default To Here( 1 );
dt1 = Data table( "Reference data table.jmp");
dt2 = Data table("Data table upd");//("Current Data Table();
Col_List = dt2 << Get Column Group( "Tests");
vc2 = Eval(
Eval Expr(
dt2 << distribution(
Stack( 1 ),
Column( Expr( Col_List ) ),
Horizontal Layout( 1 ),
Normal Quantile Plot( 1 ),
Vertical( 1 ),
Process Capability( 0 )
)
)
);
aa_refs = Associative Array( dt1:Tests << get values, dt1:Mean << get values );
/*For( i = 1, i <= N Items( Col_List ), i++,
If( Contains( aa_refs, Col_List[i] ),
Report( vc2[i] )[Framebox( 1 )] << DispatchSeg( CustomStreamSeg( 3 ), {Line Width( 2 )} );
Report( vc2[i] )[AxisBox( 1 )] << {Add Ref Line( aa_refs[Col_List[i]], "Solid", "Green", "RTS", 2 )};
)
);*/
For( i = 1, i <= N Items( Col_List ), i++,
If( Contains( aa_refs, char(Col_List[i]) ),
Report( vc2 )[char(Col_List[i])][Axisbox( 1 )] << Add Ref Line( aa_refs[char(Col_List[i])], "Solid", "Green", "RTS", 2 );
)
);
