你好@lazzybug ,
去除 ”\!”你可以使用解析()。
eval (parse(finalmodel));
如果要在 Fit Group 中运行模型,则需要 << run() 消息。
fmscript=char(fitobj<<GET script=""></GET>
希望这可以帮助。
你好@lazzybug ,
我面临着与您类似的问题。 我还想将模型更改为包含块效应的代码混合模型。 您能否提供一个最简单的例子,说明您是如何做到这一点的? 那太好了!
我还想知道如何循环通过“拟合组”来单独访问模型并使用单独的模型来提取预测等。
你好@Anja_W ,做起来太复杂了。 我建议联系 JMP 专家来解决您的问题。 祝你好运!
@tx尼尔森@yuichi_katsumur
我在一张数据表中有超过 10 个单独的 DoE 模型,这些模型是逐步自动生成的。 接下来,我想使用 JSL 打开每个 DoE 模型,并将其脚本复制到“fit group( )”内,后跟“,”,这样我就可以获得一个组合模型。 最终格式如下例所示。
适合组(
型号 1,
型号 2,
型号 3,
....
);
模型 1 = 拟合模型 ()
模型 2 = 拟合模型 ()
BTW:是否可以从DoE脚本中获得模型效果? 如果块的随机效应处于效果中,我还需要将模型更改为 REML。 实际上,如果我知道如何使用 JSL 编辑脚本,我就可以解决这个问题。 非常感谢您的帮助。
我实际上已经在下面编写了一些代码,我需要的唯一帮助是删除“\!”,并替换 Finalmodel 变量开头和结尾的“。
名称默认为此处( 1 );
dt = 当前数据表();
jslList = dt << 获取表脚本名称;
print (N 个项目(jslList));
赢列表 = {};
点=“,”;
模型文本=“”;
对于 (i=1, i<=N 项(jslList),i++,
runjsl = dt << 运行脚本(jslList[i]);
rbiv = runjsl << 报告;
rbiv << 显示窗口( 1 );
fitobj = rbiv[outlinebox(1)]<<获取可编写脚本的对象;
fmscript=char(fitobj<<获取脚本);
模型文本 = 模型文本 || fm脚本 ||点;
//打印(fm脚本);
插入(winList, rbiv);
);
对于 (i=1, i<=N 项(winList), i++,
winList[i] << 关闭窗口();
);
Finalmodel = "拟合组(" || modeltext || ")";
/*finalmodel = Substitute(finalmodel, "\!", "");*/
打印(最终模型);