707896_es-ES

liliconcom

¿Cómo obtener etiquetas del eje Y de varios gráficos Y y cambiar solo etiquetas específicas?

En un gráfico y múltiple, ¿cómo puedo obtener las etiquetas/mosaicos del eje y trazados (por ejemplo, obtener AAA, BBB, CCC, DDD y FFF como una lista) y cambiar algunos específicos (después del trazado), digamos en BBB y DDD? ?

 

 

 

Automatización y secuencias de comandosventanasRe: ¿Cómo obtener etiquetas del eje Y de varios gráficos Y y cambiar solo etiquetas específicas?

Una opción es utilizar << Obtener pantalla de leyenda y sus elementos

Names Default To Here(1);

dt = Open("$SAMPLE_DATA/Big Class.jmp");
gb = Graph Builder(
 Variables(X(:height), Y(:weight), Overlay(:sex), Color(:age)),
 Elements(Points(X, Y, Legend(1)), Smoother(X, Y, Legend(2)))
);
lgnd = gb << Get Legend Display;
items = lgnd << Get Items;
For Each({item}, items,
 If(Contains({"12", "14"}, item << get label),
  item << Set label(Repeat(item << get label, 3))
 );
);

Re: ¿Cómo obtener etiquetas del eje Y de varios gráficos Y y cambiar solo etiquetas específicas?

@jthi Gracias. Tengo miedo, no lo sigo. Quizás no expliqué correctamente el caso.

Quiero capturar las etiquetas del eje y existentes en un gráfico de varios ejes y, digamos en una lista, y luego cambiar las específicas a los nombres de etiqueta deseados y volver a trazar.

Re: ¿Cómo obtener etiquetas del eje Y de varios gráficos Y y cambiar solo etiquetas específicas?

Ah... Pensé que querías modificar la leyenda. Las etiquetas de los ejes parecen ser una de las cosas molestas (puede eliminarlas y agregar nuevas, pero no estoy exactamente seguro de cómo obtener la etiqueta actual). Entonces XPath para rescatar como de costumbre (podría ser una buena idea filtrar el título del gráfico y posiblemente el eje x)

Names Default To Here(1);

dt = Open("$SAMPLE_DATA/Big Class.jmp");
gb = dt << Graph Builder(
 Size(528, 454),
 Show Control Panel(0),
 Variables(X(:height), Y(:height), Y(:weight)),
 Elements(Position(1, 1), Points(X, Y, Legend(3))),
 Elements(Position(1, 2), Points(X, Y, Legend(1)))
);

rep = Report(gb);

tebs = rep << XPath("//GraphBuilderTitleBox/TextEditBox");

For Each({teb}, tebs,
 cur_title = teb << get text;
 show(cur_title);
 If(cur_title == "weight",
  teb << Set Text(Repeat(cur_title, 2))
 );
);