嗨,大家好,
我在多个数据表的图形生成器中有多个图形。 注意两点:
- 它们都是使用JSL创建的。
- 除最后一个窗口外,大多数都已附加到JMP窗口。
由于某种原因,我只能突出显示最后一个图形构建器绘图上的数据(并在其表中选择相应的行)。
为什么会这样,有什么办法可以解决?
谢谢。
您没有提供足够的信息(详细信息)以真正允许任何实际的诊断。 脚本副本和输出图像确实有帮助
谢谢@txnelson和@Thierry_S为答复。
不幸的是,由于NDA的原因,我无法共享整个脚本或情节,但是我会尽可能提供更多详细信息。
窗口如下所示:
CreateResultsWindow = Function(
// Inputs
{Title},
// Local variables
{
Window, ReturnList,
OutLineBox1, BorderBox1, LineUpBox1
},
Window = NewWindow(Title,
OutLineBox1 = OutLineBox(
"Outline Box 1",
BorderBox1 = BorderBox(
Left(40), Right(40), Top(40), Bottom(40), Sides(30),
LineUpBox1 = LineUpBox(NCol(2));
);
);
);
ReturnList = {};
InsertInto(ReturnList, OutLineBox1);
InsertInto(ReturnList, LineUpBox1);
EvalList ( ReturnList );
);
我针对多种类型的绘图多次调用此函数,并像这样将其附加到“阵容”框:
创建多个GB对象并将其插入GB列表
GB = DT << GraphBuilder(...);
InsertInto(GBList, GB);
AppendPlotBasedOnDescendingValue(GBList, R2List, LineUpBox1);
AppendPlotBasedOnDescendingValue = Function(
// Inputs
{PlotBoxList, ValueList, AppendBox},
// Local variables
{i, RankList, ReorderedPlotBoxList},
// Vector of indices used as subscript into original list
RankList = RankIndex(ValueList);
// Reorder plots based on values
ReorderedPlotBoxList = PlotBoxList[RankList];
// Plot by descending
For(i=NItems(ReorderedPlotBoxList), i>=1, i--,
AppendBox << Append(Report(ReorderedPlotBoxList[i]));
ReorderedPlotBoxList[i] << CLoseWindow;
);
);
它被正确附加,但是我无法选择/突出显示数据表/图表。
谢谢。
你好@txnelson和@Thierry_S 。
谢谢回复。 由于某种原因,我先前的答复被标记为滥用,因此这里是一个重写:
不幸的是,由于NDA的原因,我无法共享整个脚本或情节,但我可以尝试提供更多详细信息:
我正在使用此功能创建窗口:
CreateResultsWindow = Function(
// Inputs
{Title},
// Local variables
{
Window, ReturnList,
OutLineBox1, BorderBox1, LineUpBox1
},
Window = NewWindow(Title,
OutLineBox1 = OutLineBox(
Title,
BorderBox1 = BorderBox(
Left(40), Right(40), Top(40), Bottom(40), Sides(30),
LineUpBox1 = LineUpBox(NCol(2));
);
);
);
ReturnList = {};
InsertInto(ReturnList, LineUpBox1);
EvalList ( ReturnList );
);
然后,我在for循环中创建Graph Builder对象,并将它们添加到列表中:
GB = GraphBuilder(...);
InsertInto(GBList, GB);
然后通过调用此函数将它们附加到窗口中的显示对象(“阵容”框)上:
AppendPlotBasedOnDescendingValue = Function(
// Inputs
{PlotBoxList, ValueList, AppendBox},
// Local variables
{i, RankList, ReorderedPlotBoxList},
// Vector of indices used as subscript into original list
RankList = RankIndex(ValueList);
// Reorder plots based on values
ReorderedPlotBoxList = PlotBoxList[RankList];
// Plot by descending
For(i=NItems(ReorderedPlotBoxList), i>=1, i--,
AppendBox << Append(Report(ReorderedPlotBoxList[i]));
ReorderedPlotBoxList[i] << CLoseWindow;
);
);我使用图形生成器列表和R ^ 2值列表来调用该函数。
AppendPlotBasedOnDescendingValue(GBList, R2List, LineupBox);
它可以工作,但是我无法选择/突出显示表/图形构建器上的数据。
谢谢。