Hola a todos,
Estoy intentando obtener un punto de vértice del gráfico bivariado
Hasta ahora, extraigo el parámetro con un script y lo calculo en una hoja de Excel.
Estoy bastante seguro de que la función de búsqueda de vértices está incluida en JMP, pero no pude encontrarla.
¿Hay alguna forma de obtener el vértice directamente?
Gracias
<script que="" utilicé="" para="" extraer="" el="" parámetro="">&amp;amp;amp;lt;/P&amp;amp;amp;gt;
&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;
&amp;amp;amp;lt;PRE&amp;amp;amp;gt;&amp;amp;amp;lt;CODE class=" language-jsl"&amp;amp;amp;gt;dt = Current data Table ();
biv=Bivariate(
Y( :contrast_100cm ),
X( :Offset_Z ),
Fit Polynomial( 2, {Line Color( {212, 73, 88} )} ),
Where( :site == "Para#4" )
);
rbiv = biv &amp;amp;amp;lt;&amp;amp;amp;lt; report;
rbiv[tablebox(4)]&amp;amp;amp;lt;&amp;amp;amp;lt;make data table("Parameter table");&amp;amp;amp;lt;/CODE&amp;amp;amp;gt;&amp;amp;amp;lt;/PRE&amp;amp;amp;gt;
&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;
&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;/lingo-body&amp;amp;amp;gt;&amp;amp;amp;lt;lingo-labs id="lingo-labs-274941" slang="en-US"&amp;amp;amp;gt;&amp;amp;amp;lt;lingo-label&amp;amp;amp;gt;Modelado estadístico avanzado&amp;amp;amp;lt;/lingo-label&amp;amp;amp;gt;&amp;amp;amp;lt;lingo-label&amp;amp;amp;gt;Automatización y secuencias de comandos&amp;amp;amp;lt;/lingo-label&amp;amp;amp;gt;&amp;amp;amp;lt;lingo-label&amp;amp;amp;gt;Combinación y limpieza de datos&amp;amp;amp;lt;/lingo-label&amp;amp;amp;gt;&amp;amp;amp;lt;lingo-label&amp;amp;amp;gt;La personalización en masa&amp;amp;amp;lt;/lingo-label&amp;amp;amp;gt;&amp;amp;amp;lt;lingo-label&amp;amp;amp;gt;Ingeniería de Calidad y Procesos&amp;amp;amp;lt;/lingo-label&amp;amp;amp;gt;&amp;amp;amp;lt;/lingo-labs&amp;amp;amp;gt;&amp;amp;amp;lt;lingo-sub id="lingo-sub-283195" slang="en-US"&amp;amp;amp;gt;Re: Encontrar el vértice del gráfico bivariado&amp;amp;amp;lt;/lingo-sub&amp;amp;amp;gt;&amp;amp;amp;lt;lingo-body id="lingo-body-283195" slang="en-US"&amp;amp;amp;gt;Funcionó&amp;amp;amp;lt;BR /&amp;amp;amp;gt; Muchas gracias&amp;amp;amp;lt;/lingo-body&amp;amp;amp;gt;&amp;amp;amp;lt;lingo-sub id="lingo-sub-281703" slang="en-US"&amp;amp;amp;gt;Re: Encontrar el vértice del gráfico bivariado&amp;amp;amp;lt;/lingo-sub&amp;amp;amp;gt;&amp;amp;amp;lt;lingo-body id="lingo-body-281703" slang="en-US"&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;Como he publicado muchas veces, el&amp;amp;amp;lt;STRONG&amp;amp;amp;gt; Enviar a informe()&amp;amp;amp;lt;/STRONG&amp;amp;amp;gt; y&amp;amp;amp;lt;STRONG&amp;amp;amp;gt; Despacho()&amp;amp;amp;lt;/STRONG&amp;amp;amp;gt; Los argumentos están destinados a que JMP guarde la personalización. No están destinados a usuarios. Por supuesto, puedes usarlos. Pero hay mejores maneras.&amp;amp;amp;lt;/P&amp;amp;amp;gt;
&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;
&amp;amp;amp;lt;P&amp;amp;amp;gt;Parece que quieres agregar la respuesta a la trama. Este ejemplo ilustra cómo hacerlo.&amp;amp;amp;lt;/P&amp;amp;amp;gt;
&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;
&amp;amp;amp;lt;PRE&amp;amp;amp;gt;&amp;amp;amp;lt;CODE class=" language-jsl"&amp;amp;amp;gt;Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );
// fit quadratic polynomial interpolating function
biv = dt &amp;amp;amp;lt;&amp;amp;amp;lt; Bivariate(
Y( :weight ),
X( :height ),
Fit Line
);
// get reference to report layer
rbiv = biv &amp;amp;amp;lt;&amp;amp;amp;lt; Report;
// get parameter estimates
parm = rbiv["Parameter Estimates"][Number Col Box( 1 )] &amp;amp;amp;lt;&amp;amp;amp;lt; Get As Matrix;
// compute x intercept
ans = -parm[1] / parm[2];
rbiv[FrameBox(1)] &amp;amp;amp;lt;&amp;amp;amp;lt; Add Graphics Script(
Text( { 52.5, 160 }, "X intercept is " || Char( ans ) )
);&amp;amp;amp;lt;/CODE&amp;amp;amp;gt;&amp;amp;amp;lt;/PRE&amp;amp;amp;gt;&amp;amp;amp;lt;/lingo-body&amp;amp;amp;gt;&amp;amp;amp;lt;lingo-sub id="lingo-sub-281689" slang="en-US"&amp;amp;amp;gt;Re: Encontrar el vértice del gráfico bivariado&amp;amp;amp;lt;/lingo-sub&amp;amp;amp;gt;&amp;amp;amp;lt;lingo-body id="lingo-body-281689" slang="en-US"&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;Hola Makrbailey,&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;¿Puedo pedir más cosas?&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;Cambié ligeramente el script para resolver la función lineal y funcionó correctamente.&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;sin embargo, descubrí que verificar el resultado a través del registro no es tan conveniente como verificarlo a través del cuadro de árbol.&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;Por lo que sé, la función de envío es la correcta para crear un cuadro de árbol para informar.&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;entonces cambié el guión de la siguiente manera. sin embargo, no funciona.&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;y quiero obtener la respuesta de cada sitio (hay 4 sitios). así que intenté hacerlo pero tampoco funcionó.&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;Podrías por favor darme tu mano para solucionarlo&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;Muchas gracias&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;-&amp;amp;amp;gt; Mi propósito&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;1. agregue ans de cada sitio.&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;2. agregue ans al informe.&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;-&amp;amp;amp;gt; Mi guión&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;Nombres predeterminados aquí (1);&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;dt = Tabla de datos actual();&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;// ajusta la función de interpolación polinomial cuadrática&amp;amp;amp;lt;BR /&amp;amp;amp;gt; biv = dt &amp;amp;amp;lt;&amp;amp;amp;lt; Bivariado(&amp;amp;amp;lt;BR /&amp;amp;amp;gt; Y( :CALU_CALU_intr_cy ),&amp;amp;amp;lt;BR /&amp;amp;amp;gt; X( :OC compensación Y um ),&amp;amp;amp;lt;BR /&amp;amp;amp;gt; Ajustar línea ({Color de línea ({212, 73, 88})}),&amp;amp;amp;lt;BR /&amp;amp;amp;gt; por(:sitio),&amp;amp;amp;lt;BR /&amp;amp;amp;gt; );&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;// obtener referencia a la capa del informe&amp;amp;amp;lt;BR /&amp;amp;amp;gt; rbiv = biv &amp;amp;amp;lt;&amp;amp;amp;lt; Informe;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;// obtener estimaciones de parámetros&amp;amp;amp;lt;BR /&amp;amp;amp;gt; parm = rbiv[&amp;amp;amp;amp;quot;Estimaciones de parámetros&amp;amp;amp;amp;quot;][Cuadro de columna numérica (1)] &amp;amp;amp;lt;&amp;amp;amp;lt; Obtener como matriz;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;// calcula la intercepción x&amp;amp;amp;lt;BR /&amp;amp;amp;gt; respuesta = -parm[1] / parm[2];&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;rbiv&amp;amp;amp;lt;&amp;amp;amp;lt;despacho(&amp;amp;amp;lt;BR /&amp;amp;amp;gt; {&amp;amp;amp;amp;quot;res&amp;amp;amp;amp;quot;},&amp;amp;amp;lt;BR /&amp;amp;amp;gt; &amp;amp;amp;amp;quot;ans&amp;amp;amp;amp;quot;,&amp;amp;amp;lt;BR /&amp;amp;amp;gt; caja de marco,&amp;amp;amp;lt;BR /&amp;amp;amp;gt; {tamaño del marcador(3)}&amp;amp;amp;lt;BR /&amp;amp;amp;gt; );&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;Gracias&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;DIV class="hover-card-container"&amp;amp;amp;gt;&amp;amp;amp;lt;DIV class="profileCard"&amp;amp;amp;gt;&amp;amp;amp;lt;DIV class="inner"&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/DIV&amp;amp;amp;gt;&amp;amp;amp;lt;/DIV&amp;amp;amp;gt;&amp;amp;amp;lt;/DIV&amp;amp;amp;gt;&amp;amp;amp;lt;/lingo-body&amp;amp;amp;gt;&amp;amp;amp;lt;lingo-sub id="lingo-sub-276776" slang="en-US"&amp;amp;amp;gt;Re: Encontrar el vértice del gráfico bivariado&amp;amp;amp;lt;/lingo-sub&amp;amp;amp;gt;&amp;amp;amp;lt;lingo-body id="lingo-body-276776" slang="en-US"&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;El&amp;amp;amp;lt;STRONG&amp;amp;amp;gt; Espectáculo()&amp;amp;amp;lt;/STRONG&amp;amp;amp;gt; La función escribe texto según sus argumentos en la ventana Registro, que no está abierta de forma predeterminada. Seleccionar&amp;amp;amp;lt;STRONG&amp;amp;amp;gt; Ver &amp;amp;amp;gt; Registro&amp;amp;amp;lt;/STRONG&amp;amp;amp;gt; si está utilizando Windows o&amp;amp;amp;lt;STRONG&amp;amp;amp;gt; Ventana &amp;amp;amp;gt; Registro&amp;amp;amp;lt;/STRONG&amp;amp;amp;gt; si está utilizando Macintosh.&amp;amp;amp;lt;/P&amp;amp;amp;gt;
&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;
&amp;amp;amp;lt;P&amp;amp;amp;gt;Modifiqué el guión para estimar la intersección con el eje x, asumiendo que existe en el plano real. Es simplemente la solución cuadrática para las raíces.&amp;amp;amp;lt;/P&amp;amp;amp;gt;
&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;
&amp;amp;amp;lt;PRE&amp;amp;amp;gt;&amp;amp;amp;lt;CODE class=" language-jsl"&amp;amp;amp;gt;Names Default To Here( 1 );
// example of data
x = -5::5;
dt = New Table( "Non-Linear Data",
New Column( "X", Numeric, Continuous, Values( x ) ),
New Column( "Y", Numeric, Continuous, Values( x^2 - x - 12 ) )
);
// fit quadratic polynomial interpolating function
biv = dt &amp;amp;amp;lt;&amp;amp;amp;lt; Bivariate(
Y( :Y ),
X( :X ),
Fit Polynomial( 2 )
);
// get reference to report layer
rbiv = biv &amp;amp;amp;lt;&amp;amp;amp;lt; Report;
// get parameter estimates
parm = rbiv["Parameter Estimates"][NumberColBox( 1 )] &amp;amp;amp;lt;&amp;amp;amp;lt; Get As Matrix;
// compute x intercept
ans = parm[2]^2 - 4*parm[3]*parm[1];
x intercepts = If( ans &amp;amp;amp;gt; 0,
(-parm[2] + { -1, 1 } * Sqrt( ans )) / (2*parm[3]);
);
Show( parm, x intercepts );&amp;amp;amp;lt;/CODE&amp;amp;amp;gt;&amp;amp;amp;lt;/PRE&amp;amp;amp;gt;&amp;amp;amp;lt;/lingo-body&amp;amp;amp;gt;&amp;amp;amp;lt;lingo-sub id="lingo-sub-276749" slang="en-US"&amp;amp;amp;gt;Re: Encontrar el vértice del gráfico bivariado&amp;amp;amp;lt;/lingo-sub&amp;amp;amp;gt;&amp;amp;amp;lt;lingo-body id="lingo-body-276749" slang="en-US"&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;Gracias por su amable respuesta.&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;Debido a que explicó cada código mediante comentarios, fue fácil de entender.&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;Estaba intentando modificar tu código para descubrir el&amp;amp;amp;lt;SPAN&amp;amp;amp;gt; x interceptar en función lineal.&amp;amp;amp;lt;/SPAN&amp;amp;amp;gt;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;lt;SPAN&amp;amp;amp;gt;pero no salió nada.&amp;amp;amp;lt;/SPAN&amp;amp;amp;gt;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;lt;SPAN&amp;amp;amp;gt;En realidad, no sé cómo funciona la &amp;amp;amp;amp;quot;función de mostrar&amp;amp;amp;amp;quot;.&amp;amp;amp;lt;/SPAN&amp;amp;amp;gt;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;lt;SPAN&amp;amp;amp;gt;¿Podrías ayudarme a resolver esto?&amp;amp;amp;lt;/SPAN&amp;amp;amp;gt;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;lt;SPAN&amp;amp;amp;gt;Gracias&amp;amp;amp;lt;/SPAN&amp;amp;amp;gt;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;/lingo-body&amp;amp;amp;gt;&amp;amp;amp;lt;lingo-sub id="lingo-sub-275901" slang="en-US"&amp;amp;amp;gt;Re: Encontrar el vértice del gráfico bivariado&amp;amp;amp;lt;/lingo-sub&amp;amp;amp;gt;&amp;amp;amp;lt;lingo-body id="lingo-body-275901" slang="en-US"&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;Gracias por tu respuesta.&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;Probé el script y descubrí que esto es exactamente lo que estaba buscando.&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;(Aunque no entendí todo el código)&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;pero encontré que el valor Offset_Z que se calcula por superficie de respuesta es ligeramente diferente de mi cálculo manual (por diferencial)&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;la diferencia era inferior a 0,0003, por lo que no fue gran cosa&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;Gracias de nuevo por tu ayuda&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;/lingo-body&amp;amp;amp;gt;&amp;amp;amp;lt;lingo-sub id="lingo-sub-275038" slang="en-US"&amp;amp;amp;gt;Re: Encontrar el vértice del gráfico bivariado&amp;amp;amp;lt;/lingo-sub&amp;amp;amp;gt;&amp;amp;amp;lt;lingo-body id="lingo-body-275038" slang="en-US"&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;O bien, otro enfoque es usar Ajustar modelo, usar la macro Superficie de respuesta para que JMP establezca el atributo de superficie de respuesta. Luego obtendrá una salida de superficie de respuesta que resuelve los valores críticos.&amp;amp;amp;lt;/P&amp;amp;amp;gt;
&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;
&amp;amp;amp;lt;P&amp;amp;amp;gt;Hice que JMP creara este script con algunos datos que inventé.&amp;amp;amp;lt;/P&amp;amp;amp;gt;
&amp;amp;amp;lt;PRE&amp;amp;amp;gt;&amp;amp;amp;lt;CODE class=" language-jsl"&amp;amp;amp;gt;Fit Model(
Y( :contrast_100cm ),
Effects( :Offset_Z &amp;amp;amp;amp;amp; RS, :Offset_Z * :Offset_Z ),
Personality( "Standard Least Squares" ),
Emphasis( "Effect Leverage" ),
Run(
:contrast_100cm &amp;amp;amp;lt;&amp;amp;amp;lt; {Summary of Fit( 0 ), Analysis of Variance( 0 ),
Parameter Estimates( 0 ), Lack of Fit( 0 ), Scaled Estimates( 0 ),
Plot Actual by Predicted( 0 ), Plot Residual by Predicted( 0 ),
Plot Studentized Residuals( 0 ), Plot Effect Leverage( 0 ),
Plot Residual by Normal Quantiles( 0 ), Box Cox Y Transformation( 0 )}
),
SendToReport(
Dispatch(
{"Response contrast_100cm", "Whole Model"},
"Summary of Fit",
OutlineBox,
{Close( 1 )}
),
Dispatch(
{"Response contrast_100cm", "Whole Model"},
"Analysis of Variance",
OutlineBox,
{Close( 1 )}
),
Dispatch(
{"Response contrast_100cm", "Whole Model"},
"Parameter Estimates",
OutlineBox,
{Close( 1 )}
),
Dispatch(
{"Response contrast_100cm"},
"Response Surface",
OutlineBox,
{Close( 0 )}
)
)
)&amp;amp;amp;lt;/CODE&amp;amp;amp;gt;&amp;amp;amp;lt;/PRE&amp;amp;amp;gt;
&amp;amp;amp;lt;P&amp;amp;amp;gt;Aquí está la parte del resultado que encuentra el valor crítico.&amp;amp;amp;lt;/P&amp;amp;amp;gt;
&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;lt;span class="lia-inline-image-display-wrapper lia-image-align-inline" image-alt="Capture.JPG" style="width: 397px;"&amp;amp;amp;gt;&amp;amp;amp;lt;img src="https://us.v-cdn.net/6038925/uploads/images/24767iADD01124ED9FCA53/Capture.JPG>" width="397" height="607" role="button" title="Capturar.JPG" alt="Capturar.JPG" /&amp;amp;amp;gt;&amp;amp;amp;lt;/span&amp;amp;amp;gt;&amp;amp;amp;lt;/P&amp;amp;amp;gt;&amp;amp;amp;lt;/lingo-body&amp;amp;amp;gt;&amp;amp;amp;lt;lingo-sub id="lingo-sub-275022" slang="en-US"&amp;amp;amp;gt;Re: Encontrar el vértice del gráfico bivariado&amp;amp;amp;lt;/lingo-sub&amp;amp;amp;gt;&amp;amp;amp;lt;lingo-body id="lingo-body-275022" slang="en-US"&amp;amp;amp;gt;&amp;amp;amp;lt;P&amp;amp;amp;gt;JMP no tiene un solucionador como tal. Pero está ajustando una función de interpolación polinomial cuadrática, por lo que solo necesita establecer la primera derivada con respecto a Offset_Z igual a cero y resolver para Offset_Z. Supongo que por &amp;amp;amp;amp;quot;vértice&amp;amp;amp;amp;quot; te refieres al mínimo o máximo de la función.&amp;amp;amp;lt;/P&amp;amp;amp;gt;
&amp;amp;amp;lt;P&amp;amp;amp;gt;&amp;amp;amp;nbsp;&amp;amp;amp;lt;/P&amp;amp;amp;gt;
&amp;amp;amp;lt;PRE&amp;amp;amp;gt;&amp;amp;amp;lt;CODE class=" language-jsl"&amp;amp;amp;gt;Names Default To Here( 1 );
// example of data
dt = Current Data Table();
// fit quadratic polynomial interpolating function
biv = dt &amp;amp;amp;lt;&amp;amp;amp;lt; Bivariate(
Y( :contrast_100cm ),
X( :Offset_Z ),
Fit Polynomial( 2, {Line Color( {212, 73, 88} )} ),
Where( :site == "Para#4" )
);
// get reference to report layer
rbiv = biv &amp;amp;amp;lt;&amp;amp;amp;lt; Report;
// get parameter estimates
parms = rbiv[NumberColBox( 1 )] &amp;amp;amp;lt;&amp;amp;amp;lt; Get As Matrix;
// compute extremum
extremum = -parms[2] / (2*parms[3]);
Show( parms, extremum );&amp;amp;amp;lt;/CODE&amp;amp;amp;gt;&amp;amp;amp;lt;/PRE&amp;amp;amp;gt;&amp;amp;amp;lt;/lingo-body&amp;amp;amp;gt;
