677243_es-ES

liliconcom

Leyenda de fila alterna JSL para múltiples gráficos de variabilidad en una ventana

Hola a todos,

 

Estoy atrapado en un escenario. Tengo un gráfico de variabilidad que tiene 8 gráficos diferentes en una ventana usando la cláusula by dos veces. Un caso tiene dos opciones y quiero agregar una leyenda de fila para una columna para un caso y otra para el otro, ya que uno tiene los colores de valor configurados de manera diferente para un caso.

 

A continuación se muestra el código JSL que estoy intentando pero que no funciona ni siquiera para mostrar las leyendas de las filas. Cualquier ayuda sería apreciada.

dt = Open("$SAMPLE_DATA/Cars.jmp");
Column(dt, "Size" ) << Set Property( "Value Colors", {"It" = 0} );

vc = Variability Chart(
 Y( :Wt ),
 X( :Model ),
 Show Range Bars( 0 ),
 Show Cell Means( 0 ),
 Std Dev Chart( 0 ),
 By( :"D/P"n, :Protection )
);

If (Column(dt, "D/P"n)[1] == "Driver",
    vc << Row Legend("Doors");
);


If (Column(dt, "D/P"n)[1] == "Passenger",
    vc << Row Legend("Size");
);

Los ejemplos anteriores serían el caso ideal en el que si d/p="Driver" entonces se agrega puertas como leyenda de fila y se usan colores regulares. Pero si se agrega el tamaño d/p="pasajero" como leyenda de la fila y dado que el tamaño tiene el valor de colores establecido en negro, lo agregará automáticamente como debería ser, como se muestra en mi pregunta anterior en: https://community.jmp.com/t5/Discussions/JSL-coloring-single-element-of-legend-to-a-custom-color/mp/676602#M86324

 

¡Gracias e idealmente estoy buscando el código JSL para hacer esto si es posible!

Automatización y secuencias de comandosAnálisis y modelado de datos básicosExploración y visualización de datosRe: Leyenda de fila alterna JSL para múltiples gráficos de variabilidad en una ventana

La leyenda de la fila está configurada en Cuadro de marco

 

Por lo tanto, debe configurar la leyenda de la fila en diferentes cuadros de marco. Puede recorrer los cuadros de marco o utilizar algún otro método para obtener referencias a ellos (XPath). A continuación se muestra un ejemplo usando bucle

Names Default To Here(1);

dt = Open("$SAMPLE_DATA/Cars.jmp");
Column(dt, "Size") << Set Property("Value Colors",
 {"comp" = -15113984, "hev" = -5682409, "lt" = 0, "med" = -29362, "mini"
  = -13983232, "mpv" = -13400487, "pu" = -16442434, "van" = -9282864}
);
wait(0);

vcs = dt << Variability Chart(
 Y(:Wt),
 X(:Model),
 Show Range Bars(0),
 Show Cell Means(0),
 Std Dev Chart(0),
 By(:"D/P"n, :Protection)
);

obs = vcs << report;
// ob_titles = obs << get title;

For Each({cur_ob, idx}, obs,
 //cur_ob = obs[1];
 cur_title = cur_ob << get title;
 If(Contains(cur_title, "Variability Gauge D/P=Driver"),
  cur_ob[FrameBox(1)] << Row Legend("Doors");
 , Contains(cur_title, "Variability Gauge D/P=Passenger"),
  cur_ob[FrameBox(1)] << Row Legend("Size", Color Theme(""));
 , // else (do nothing)
  continue();
 );
 // show(cur_title, idx);
);