Hola @lazzybug ,
Para eliminar "\!" puedes usar analizar().
eval (parse(finalmodel));
Si desea ejecutar el modelo en el Grupo de ajuste, necesita un mensaje << ejecutar().
fmscript=char(fitobj<<GET script=""></GET>
Espero que esto ayude.
Hola @lazzybug ,
Estoy enfrentando un problema similar al tuyo. También quiero cambiar los modelos, donde se incluyó un efecto de bloque, a un modelo mixto desde el código. ¿Podría proporcionar un ejemplo mínimo de cómo logró esto? ¡Eso seria genial!
También me preguntaba cómo recorrer un "Grupo de ajuste" para acceder a los modelos individualmente y usar los modelos individuales para extraer, por ejemplo, predicciones.
Hola @Anja_W , es demasiado complicado hacerlo. Sugerí contactar a los expertos de JMP para resolver su problema. ¡Buena suerte!
@txnelson @yuichi_katsumur
Tengo más de 10 modelos DoE individuales en una tabla de datos que se generó paso a paso de forma automática. A continuación, quiero usar JSL para abrir cada modelo DoE y copiar su script dentro de "fit group()", seguido de ",", para poder tener un modelo combinado. El formato final se verá como el ejemplo siguiente.
Grupo apto(
modelo 1,
modelo 2,
modelo 3,
....
);
modelo 1 = modelo ajustado ()
modelo 2 = modelo ajustado ()
Por cierto: ¿Es posible obtener el efecto del modelo a partir del script DoE? También necesito cambiar mi modelo a REML si el efecto aleatorio del bloque está activo. De hecho, puedo resolver esto si sé cómo editar el script con JSL. Muchas gracias por tu ayuda.
De hecho, ya hice algo de código a continuación, la única ayuda que necesito es eliminar "\!" y reemplazar " al principio y al final de la variable finalmodel.
Nombres predeterminados aquí (1);
dt = Tabla de datos actual();
jslList = dt << Obtener nombres de scripts de tabla;
imprimir (N elementos (jslList));
listawin = {};
punto = ",";
textomodelo = "";
para (i=1, i<=N elementos (jslList),i++,
runjsl = dt << Ejecutar script(jslList[i]);
rbiv = runjsl << Informe;
rbiv << Mostrar ventana( 1 );
fitobj = rbiv[outlinebox(1)]< fmscript=char(fitobj< textomodelo = textomodelo || script || punto;
//imprimir(fmscript);
Insertar en (winList, rbiv);
);
para (i=1, i<=N elementos (winList), i++,
winList[i] << Cerrar ventana();
);
finalmodel = "Ajustar grupo (" || modeltext || ")";
/*modelofinal = Sustituir(modelofinal, "\!", "");*/
imprimir (modelo final);
