不可预测的正交拟合显示窗口标题我正在使用jsl脚本制作一系列Orthogonal Fit图,我需要向每个人发送一条消息(我希望默认关闭分析结果框)。但是,该框的标题是不可预测的,因为它包含比率值,其格式根据值的数量级而变化。一些例子如下所示。正交拟合比= 0.000正交拟合比= 0.123正交拟合比= 1.234正交拟合比= 12.34正交拟合比= 1234正交拟合比= 12345正交拟合比= 1e + 6如何编写代码来解决这些潜在可能性中的任何一个?如果我可以关闭所有以Orthogonal开头的分析框,那么简单的解决方案就是如此。Re:不可预测的正交拟合显示窗口标题更改最后一行以使用正确的helpKey搜索大纲框:
Names Default To Here( 1 );
// open data table
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );
// create container for platform references
platform = List();
dt << New Column( "agenum", formula( Num( :age ) ) );
// launch platform
p = dt << Fit Group(
Bivariate( Y( :weight ), X( :height ), Fit Orthogonal( Univariate Variances, {Line Color( {213, 72, 87} )} ) ),
Bivariate( Y( :weight ), X( :agenum ), Fit Orthogonal( Univariate Variances, {Line Color( {213, 72, 87} )} ) ),
<<{Arrange in Rows( 2 )}
);
// save reference in the list
Insert Into( platform, p );
Wait( 1 );
// send message to all platforms
( platform << XPath("//OutlineBox[@helpKey='Bivar Ortho']") ) << Close( 1 );Re:不可预测的正交拟合显示窗口标题谢谢。我实际想做的事情如下图所示。最后一行不起作用,但想法是关闭分析框,而不是实际的图。我通常可以为大多数分析框(Fit Line等)执行此操作,但Orthogonal Fit有一个特殊问题,因为分析结果实际上包含在框的名称中。
拍
名称默认为此处(1);
//打开数据表
dt = Open(“$ SAMPLE_DATA / Big Class.jmp”);
//为平台引用创建容器
platform = List();
dt <<新栏目(“agenum”,公式(Num(:age)));
//启动平台
p = dt << Fit Group(
二元(
Y(:重量),
X(:身高),
拟合正交(单变量方差,{线颜色({213,72,87})})
)
二元(
Y(:重量),
X(:agenum),
拟合正交(单变量方差,{线颜色({213,72,87})})
)
<< {排成行(2)}
);
//在列表中保存引用
插入(平台,p);
等(1);
//向所有平台发送消息
platform << Dispatch({},“Orthogonal Fit Ratio =?”,OutlineBox,{Close(1)});
Re:不可预测的正交拟合显示窗口标题您还可以在启动时保存对窗口的引用,然后向它们发送消息。如果将引用存储在列表中,则列表会将消息分发到所有项目。看这个例子:
Names Default to Here( 1 );
// open data table
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );
// create container for platform references
platform = List();
// launch first platform
p = dt << Distribution( Y( :weight, :height ) );
// save reference in the list
Insert Into( platform, p );
Wait( 1 );
// launch second platform
p = dt << Bivariate( Y( :weight ), X( :height ), Fit Line );
// save reference in the list
Insert Into( platform, p );
Wait( 1 );
// send message to all platforms
platform << Close Window;
Re:不可预测的正交拟合显示窗口标题我会使用XPath,也许这会让你开始:
Names default to here( 1);
dt = Open( "$Sample_data/iris.jmp" );
win = New Window( "Bivariate Fits",
dt << Bivariate(
Y( :Sepal length ),
X( :Sepal width ),
Fit Orthogonal( Univariate Variances, {Line Color( {213, 72, 87} )} )
),
dt << Bivariate(
Y( :Petal length ),
X( :Petal width ),
Fit Orthogonal( Univariate Variances, {Line Color( {213, 72, 87} )} )
)
);
( win << XPath("//OutlineBox[@helpKey='Bivar Ortho']") ) << Close( 1 );
( win << XPath("//OutlineBox[@helpKey='Bivar Ortho']") )[1] << Close( 0 );
//Here is how I found the helpKey:
win << Show tree structure