753649_es-ES

liliconcom

Cómo eliminar los controles de spline de suavizado del ajuste bivariado

¿Cómo elimino los controles de spline de suavizado? Tengo un informe con un montón de splines y esta lista de controles ocupa toda la página y colapsa efectivamente el gráfico. Vi una pregunta similar, pero tengo otra parte en mi script y la solución no funciona.

¿Cómo lo elimino?

Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Big Class.jmp");

g=vlistbox(Big Class<< 
Fit Group(
	Bivariate(
	Y(:height),
	X(:weight),
	Fit Line({Line Color({76, 114, 176})}),
	Fit Spline(0.1, {Line Color({221, 132, 82})})
),
),
);

//This is the solution given to the question, but its not work for me, I guess because the vlistbox and fit grop

(Report(biv) << XPath("//BorderBox"))[2] << Visibility("Collapse");

//this might collapse too much, so make sure it doesn't
(Report(biv) << XPath("//IfBox")) << Visibility("Collapse");

Automatización y secuencias de comandosExploración y visualización de datosRe: Cómo eliminar controles de spline de suavizado del ajuste bivariado

Aquí hay una versión simplificada del código proporcionado. Simplemente abre la tabla de datos, ejecuta el código bivariado y luego elimina los controles spline.

Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Big Class.jmp");

biv =Bivariate(
	Y( :height ),
	X( :weight ),
	Fit Spline( 100000, {Line Color( {212, 73, 88} )} ),
	Fit Spline( 10000, {Line Color( {61, 174, 70} )} )
);

(Report(biv) << XPath("//IfBox")) << Visibility("Collapse");

Re: Cómo eliminar controles de spline de suavizado del ajuste bivariado

Necesito mantener el código de la misma manera porque tengo más cosas para mostrar.

Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Big Class.jmp");

g=vlistbox(dt<< 
Fit Group(
	Bivariate(
	Y(:height),
	X(:weight),
	Fit Line({Line Color({76, 114, 176})}),
	Fit Spline(0.1, {Line Color({221, 132, 82})})
),

	Bivariate(
	Y(:thickness),
	X(:date),
	Fit Line({Line Color({76, 114, 176})}),
	Fit Spline(0.1, {Line Color({221, 132, 82})})
),
),
);

//This is the solution given to the question, but its not work for me, I guess because the vlistbox and fit grop

(Report(g) << XPath("//BorderBox"))[2] << Visibility("Collapse");

//this might collapse too much, so make sure it doesn't
(Report(g) << XPath("//IfBox")) << Visibility("Collapse");


//open files
out=Tab Box(
"HELP",H List Box(V List Box(g)),
);
	 
/* Create Tabed Journal for Display */
all=New Window("p_all",<<JOURNAL></JOURNAL>

Re: Cómo eliminar controles de spline de suavizado del ajuste bivariado

Aquí está su código modificado. Su segundo bivariado tuvo que cambiarse ya que estaba haciendo referencia a columnas que no están en la tabla de datos de Big Class. Supongo que provienen de su tabla de datos real. También agregué variables que apuntan a las 2 bivariadas. Su referencia al uso de su variable g que apunta a VListBox no tiene un informe asociado.

dt = Open("$SAMPLE_DATA/Big Class.jmp");

g=vlistbox(dt<< 
Fit Group(
	biv =Bivariate(
	Y(:height),
	X(:weight),
	Fit Line({Line Color({76, 114, 176})}),
	Fit Spline(0.1, {Line Color({221, 132, 82})})
),

	biv2 = Bivariate(
	Y(:weight),
	X(:height),
	Fit Line({Line Color({76, 114, 176})}),
	Fit Spline(0.1, {Line Color({221, 132, 82})})
),
),
);

//This is the solution given to the question, but its not work for me, I guess because the vlistbox and fit grop

(Report(biv) << XPath("//IfBox"))[2] << Visibility("Collapse");
(Report(biv2) << XPath("//IfBox"))[2] << Visibility("Collapse");

//this might collapse too much, so make sure it doesn't
//(Report(g) << XPath("//IfBox")) << Visibility("Collapse");


//open files
out=Tab Box(
"HELP",H List Box(V List Box(g)),
);
	 
/* Create Tabed Journal for Display */
all=New Window("p_all",<<JOURNAL></JOURNAL>

<P> </P>Re: Cómo eliminar controles de spline de suavizado del ajuste bivariado

Haría esto usando XPath como ya sugirió Jim. Puede enviar << Obtener XML a su informe y ver el XML, luego encontrar qué podría usarse para crear su consulta.

Al comprobarlo rápidamente, parece que no hay nada que funcione siempre (la clave de ayuda no siempre es la misma y parece depender también del análisis), por lo que es posible que deba modificar la consulta según sus datos.

Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Big Class.jmp");

nw = New Window("", 
	vlb = V List Box(
		dt << Fit Group(
			Bivariate(
				Y(:height),
				X(:weight),
				Fit Line({Line Color({76, 114, 176})}),
				Fit Spline(0.1, {Line Color({221, 132, 82})})
			),
			Bivariate(
				Y(:weight),
				X(:height),
				Fit Line({Line Color({76, 114, 176})}),
				Fit Spline(0.1, {Line Color({221, 132, 82})})
			)
		)
	)
);

obs = vlb << XPath("//IfBox/OutlineBox"); // might collapse too much, but you could limit it to the specific reports
obs << Visibility("Collapse");

Otra opción sería obtener primero los nombres de los cuadros de esquema del ListBox (yo usaría XPath para esto)

Y luego puedes recorrer esos títulos y ocultar los cuadros de esquema correspondientes (esto se puede crear de muchas maneras diferentes)

Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Big Class.jmp");

nw = New Window("", 
	vlb = V List Box(
		dt << Fit Group(
			Bivariate(
				Y(:height),
				X(:weight),
				Fit Line({Line Color({76, 114, 176})}),
				Fit Spline(0.1, {Line Color({221, 132, 82})})
			),
			Bivariate(
				Y(:weight),
				X(:height),
				Fit Line({Line Color({76, 114, 176})}),
				Fit Spline(0.1, {Line Color({221, 132, 82})})
			)
		)
	)
);

reports = vlb << XPath("//OutlineBox[@helpKey = 'Bivariate Report']");

For Each({rep}, reports,
	tebs = rep << XPath("//ListBox/ListBox[PopupBox and CustomBox]/TextEditBox");
	ob_titles = tebs << get text;

	For Each({ob_title}, ob_titles,
		rep[OutlineBox(ob_title)] << Visibility("Collapse");
	);
);

Re: Cómo eliminar controles de spline de suavizado del ajuste bivariado

https://dergipark.org.tr/tr/pub/@binance-referans-kodu-nedir ¿solución?

Re: Cómo eliminar los controles de spline de suavizado del ajuste bivariado

Gracias a todos por la ayuda, combinado con todas las respuestas utilizo este código y me funciona:

obs = vlb<< XPath("//IfBox/OutlineBox"); // puede colapsar demasiado, pero puede limitarlo a informes específicos
obs << Visibilidad("Contraer");
obs = vlb << XPath("//BorderBox/ListBox"); // puede colapsar demasiado, pero puede limitarlo a informes específicos
obs << Visibilidad("Contraer");