933334_zh-CN

liliconcom

图表框：变量值在创建后仍会继续变化

[JMP 19] In the following script, I am trying to create a series of graph boxes that are displayed below each other in a window. For this i am given a list of values for every important characteristic (these lists are all accessible via the Associative Array 'listMap'. Then I create all graph boxes via a for loop.
This however doesn't work because the variables that are used inside of the Graph Box (i.a. iV, listMap<SPAN class="token punctuation">[</SPAN><SPAN class="token string">“中位数”</SPAN><SPAN class="token punctuation">]</SPAN><SPAN class="token punctuation">[</SPAN>iV<SPAN class="token punctuation">]</SPAN>, numReferenceLines) also change the already created Graph Boxes that use them.

Is there a way to fixate the variables in a Graph Box? I want them to be evaluated instantly and then to not be able to be changed.
Disclaimer: According to my trials, 'Eval' doesn't seem to help. Neither do Namespaces (as they also still update, even if locked) or Journals (even if 'Freeze All' is activated).

任何形式的帮助我都非常感激。提前谢谢啦！

ClearGlobals();
NamesDefaultToHere( 1 );

width = 1600;
height = 900;
boxPlotWidth = 0.5;
v = 3;

listMap = Associative Array();
listMap["frameHeightMin"]		= {0.5, 0.3, 0.4};
listMap["frameHeightMax"]		= {1.5, 2.0, 4.1};
listMap["numReferenceLines"]	= {3  , 5  , 8  };

listMap["min"]					= {0.6, 0.6, 0.5};
listMap["median"]				= {0.9, 1.4, 2.6};
listMap["max"]					= {1.3, 1.7, 3.9};

win = New Window("Test");
For(iV = 1, iV <= v, iV++,

	numReferenceLines	= listMap["numReferenceLines"][iV];
	frameHeightMin		= listMap["frameHeightMin"][iV];
	frameHeightMax		= listMap["frameHeightMax"][iV];
	
	win << Graph Box(
			Frame Size( width, height ),
			X Scale( 0, 2),
			Y Scale( frameHeightMin, frameHeightMax ),
			
			X Name("split"),
			Y Name("values"),
						
			//[] Generate grey horizontal lines
			For(h = 0,	h <= numReferenceLines, h++, HLine(frameHeightMin + (h/(numReferenceLines)*(frameHeightMax - frameHeightMin)))),
				
			//[] Min
			If(Contains(listMap, "min")		& Contains(listMap, "min"),
				Line({1 - boxPlotWidth/2,	listMap["min"][iV]	 },	{1 + boxPlotWidth/2,	listMap["min"][iV]		}));
			//[] Median
			If(Contains(listMap, "median")	& Contains(listMap, "median"),
				Line({1 - boxPlotWidth/2,	listMap["median"][iV]},	{1 + boxPlotWidth/2,	listMap["median"][iV]		}));
			//[] Max
			If(Contains(listMap, "max")		& Contains(listMap, "max"),
				Line({1 - boxPlotWidth/2,	listMap["max"][iV]	 },	{1 + boxPlotWidth/2,	listMap["max"][iV]		}));
	);
);

自动化和脚本编写数据探索与可视化回复：图表框：创建后变量值仍持续变化

使用 EvalExpr() 或 Substitute() 和 Eval() 来评估图表框中的值。

Names Default To Here(1);

width = 1600;
height = 900;
boxPlotWidth = 0.5;
v = 3;

listMap = Associative Array();
listMap["frameHeightMin"] = {0.5, 0.3, 0.4};
listMap["frameHeightMax"] = {1.5, 2.0, 4.1};
listMap["numReferenceLines"] = {3, 5, 8};

listMap["min"] = {0.6, 0.6, 0.5};
listMap["median"] = {0.9, 1.4, 2.6};
listMap["max"] = {1.3, 1.7, 3.9};

win = New Window("Test");

For(iV = 1, iV <= v, iV++, 
	numReferenceLines = listMap["numReferenceLines"][iV];
	frameHeightMin = listMap["frameHeightMin"][iV];
	frameHeightMax = listMap["frameHeightMax"][iV];
	
	Eval(EvalExpr(
		win << Append(Graph Box(
			Frame Size(width, height),
			X Scale(0, 2),
			Y Scale(frameHeightMin, frameHeightMax), 

			X Name("split"),
			Y Name("values"),

			Line({1 - Expr(boxPlotWidth) / 2, Expr(listMap["min"][iV])}, {1 + Expr(boxPlotWidth) / 2, Expr(listMap["min"][iV])});
		));
	));
);

鉴于您需要评估的变量众多，替代方案很可能更适合您。

回复：图表框：创建后变量值仍持续变化

非常感谢，这对我来说很有效。不过，如果我需要在“Graph Box(...)”中使用 ForLoop，您是否知道是否也能实现？以下代码基于之前的示例，但现在每个窗口包含多个值，用于不同的箱线图。

Names Default To Here(1);

width = 1600;
height = 900;
boxPlotWidth = 0.5;
v = 3; // number of canvas'
n = 2; // number of boxplots per canvas

listMap = Associative Array();
listMap["frameHeightMin"] = {0.5, 0.3, 0.4};
listMap["frameHeightMax"] = {1.5, 2.0, 4.1};
listMap["numReferenceLines"] = {3, 5, 8};

listMap["min"] = {{0.7, 0.6}, {0.4, 0.6}, {0.7, 0.5}};
listMap["median"] = {{0.9, 0.9}, {1.3, 1.4}, {3.0, 2.6}};
listMap["max"] = {{1.4, 1.3}, {1.8, 1.7}, {3.8, 3.9}};

win = New Window("Test");

For(iV = 1, iV <= v, iV++, 
	numReferenceLines = listMap["numReferenceLines"][iV];
	frameHeightMin = listMap["frameHeightMin"][iV];
	frameHeightMax = listMap["frameHeightMax"][iV];
	
	Eval(EvalExpr(
		win << Append(Graph Box(
			Frame Size(width, height),
			X Scale(0, n + 1),
			Y Scale(frameHeightMin, frameHeightMax), 

			X Name("split"),
			Y Name("values"),
			For(iN = 1, iN <= n, iN++,
				Line({iN - Expr(boxPlotWidth) / 2, Expr(listMap["min"][iV][iN])}, {iN + Expr(boxPlotWidth) / 2, Expr(listMap["min"][iV][iN])});
				Line({iN - Expr(boxPlotWidth) / 2, Expr(listMap["median"][iV][iN])}, {iN + Expr(boxPlotWidth) / 2, Expr(listMap["median"][iV][iN])});
				Line({iN - Expr(boxPlotWidth) / 2, Expr(listMap["max"][iV][iN])}, {iN + Expr(boxPlotWidth) / 2, Expr(listMap["max"][iV][iN])});
			)
		));
	));
);

尝试运行这段代码时，总是出现错误“名称未解析：在访问或评估‘iN’时出现 iN，iN/*###*/名称未解析：在访问或评估‘iN’时出现 iN，iN/*###*/”。
如果您知道如何操作，我将非常感激（:

顺便问一下，有没有什么网站或者论坛帖子之类的可以了解一下 Eval、EvalExpr 和 Expr 的实际工作原理？

回复：图表框：创建后变量值仍持续变化

通常我会对 GraphBox 中的值进行求值，以便更方便地访问它们，例如在 For 循环中。 这份 PDF 文件、 脚本指南、脚本索引（在 JMP 中）以及 JMP 社区都是非常好的资源。

我还建议你在测试这些功能时尝试使用更简单的方案，以便更容易理解。

Names Default To Here(1);

width = 1600;
height = 900;
linecount = 3;
linesx = {1, 2, 3};
linesy = {4, 6, 8};

nw = New Window("",
	vlb = V List Box();
);

Eval(EvalExpr(
	vlb << Append(Graph Box(
		Frame Size(width, height),
		X Scale(0, 10),
		Y Scale(0, 10),
		X Name("split"),
		Y Name("values"),
		ngb = Expr(linecount);
		xs = Expr(linesx);
		ys = Expr(linesy);
		For(i = 1, i <= ngb, i++,
			H Line(xs[i]);
			V Line(ys[i]);
		);
	));
));