For循环变量图参考线我正在使用 for 循环生成一系列图表(总共 10 个或更多图表);但是,在第六张图之后,参考线不会出现在图中。 大约第 10 或 11 个图表之后,参考线再次出现在图表中。 我尝试添加 wait(0);在多个地点但这并没有帮助。 我尝试过使用不同类型的图表、标准双变量与图表生成器,我尝试减小原始数据集的大小以查看是否是内存问题。 这些尝试都没有奏效,我正在寻找任何建议。 我想解决的第二个问题比第一个问题要少,它是如何关闭创建的临时表而不关闭我在输出窗口中创建和保存的图形。 我尝试过使用表(0)的链接,尝试在生成输出窗口后关闭表,但仍然不起作用。 非常感谢任何建议。
For( w = 1, w <= row_count, w++,
Stmt = CofA_dt10:Parameter[w];
CofA_dt9 << clear column selection;
CofA_dt9 << select where( :Parameter == Eval( Parse( Eval Insert( "Stmt" ) ) ) );
CofA_dt9a = CofA_dt9 << Subset( Output Table( "TempTable" || Char( w ) ), );
Mean_4sigmaUCL = CofA_dt9a:UCL_Line[w];
Mean_4sigmaLCL = CofA_dt9a:LCL_Line[w];
output2 << append(
V List Box(
CofA_dt9a <<
Bivariate(
Y( :test_value ),
X( :shelf_life_start_date ),
SendToReport(
Dispatch(
{},
"Bivariate Fit of test_value By shelf_life_start_date",
OutlineBox,
{Set Title(
"Parameter Value by shelf_life_start_date -" || Eval(
Parse( Eval Insert( "Stmt" ) )
)
)}
),
Dispatch(
{},
"2",
ScaleBox,
{Add Ref Line( Mean_4sigmaUCL, "Solid", "Red", "Mean_4s_UCL", 1 ),
Add Ref Line( Mean_4sigmaLCL, "Solid", "Red", "Mean_4s_LCL" )}
),
Dispatch( {}, "1", ScaleBox, {Label Row( Label Orientation( "Angled" ) )} ),
Dispatch( {}, "test_value", TextEditBox, {Set Text( "Parameter Value" )} ),
Dispatch(
{},
"Bivar Plot",
FrameBox,
{Frame Size( 1018, 423 ), Row Legend(
Flagging,
Color( 1 ),
Color Theme( "JMP Default" ),
Marker( 1 ),
Marker Theme( "Standard" ),
Continuous Scale( 0 ),
Reverse Scale( 1 ),
Excluded Rows( 0 )
)}
)
)
)
)
)
;
); //end row loop
Re: For循环变量图参考线交互式 HTML 试图在包装在克隆盒中时保持一定的交互性,但正如 Craige 指出的那样......
<SPAN class="token comment">"disconnects the clone from the data table"</SPAN>
使用行图例时,颜色和标记形状存储在表中。 当使用clonebox断开与表的连接时,我相信会创建新的标记属性数据结构,允许桌面窗口保留标记属性,但这些数据结构不会导出到交互式HTML。
我同意 SaveHTML 应该在 HTML 中提供正确的显示,因为图形的图像(就像它们在桌面上看到的那样)将出现在 HTML 中。
使用图形生成器,标记颜色和形状不会存储在表中,因此,如果您能够使用图形生成器构建相同的二元图,则无论您是否将图形包装在克隆框中,您都应该能够保留标记颜色和形状。 使用图形生成器可能根本不需要使用克隆盒。
〜约翰
Re: For循环变量图参考线@约翰_鲍威尔_JMP对于 HTML 问题。
克隆框操作将实时报告转变为一组静态显示框。 我不确定您可以期望多少交互性(我认为没有。)您也许可以使用 <<Re: For循环变量图参考线
嗨,克雷格,我发现使用 << 克隆盒会产生一个意想不到的后果。在
我的剧本。 我将输出保存为交互式 html,对于某些
原因是当保存html时,标记只显示为黑点
与我在图例中使用的标准格式相比。 不知何故,
传奇正在被停用。 有趣的是在打开的窗户里,
图表显示正确,只是当我打开 html 文件时
我观察到标记与图例不符。 如果我将输出另存为
日记,传奇也行。 我已经将范围缩小到使用
clonebox(当我注释掉它时,html被正确保存)但还没有
能够找到很多有关如何格式化克隆框的文档。
包含您的建议的脚本如下所示。
For( w = 1, w <= row_count, w++,
Stmt = CofA_dt10:Parameter[w];
Stmt2 = CofA_dt10:Material Parameter[w];
CofA_dt9 << Clear Row States;
CofA_dt9 << select where( :Parameter == Eval( Parse( Eval Insert( "Stmt" ) ) ) );
CofA_dt9a = CofA_dt9 << Subset( Output Table( "TempTable" || Char( w ) ), );
Mean_4sigmaUCL = CofA_dt9a:UCL_Line[1];
Mean_4sigmaLCL = CofA_dt9a:LCL_Line[1];
Mean_data = CofA_dt9a:Name( "Mean(real_value)" )[1];
output2 << append(
V List Box(
(CofA_dt9a << Bivariate(
Y( :test_value ),
X( :received_date ),
SendToReport(
Dispatch(
{},
"Bivariate Fit of test_value By received_date",
OutlineBox,
{Set Title( Eval( Parse( Eval Insert( "Stmt" ) ) ) )}
),
Dispatch(
{},
"2",
ScaleBox,
{Add Ref Line( Mean_4sigmaUCL, "Solid", "Red", "Mean_4s_UCL", 1 ),
Add Ref Line( Mean_4sigmaLCL, "Solid", "Red", "Mean_4s_LCL" ),
Add Ref Line( Mean_data, "Solid", "Green", "Mean" )}
),
Dispatch( {}, "1", ScaleBox, {Label Row( Label Orientation( "Angled" ) )} ),
Dispatch(
{},
"test_value",
TextEditBox,
{Set Text( Eval( Parse( Eval Insert( "Stmt2" ) ) ) )}
),
Dispatch(
{},
"Bivar Plot",
FrameBox,
{Frame Size( 1018, 423 ), Row Legend(
Flagging,
Color( 1 ),
Color Theme( "JMP Default" ),
Marker( 1 ),
Marker Theme( "Standard" ),
Continuous Scale( 0 ),
Reverse Scale( 1 ),
Excluded Rows( 0 )
)}
)
)
))
) << cloneBox
);
Close( CofA_dt9a, nosave );
); //end row loop
这是保存 html 文件的脚本,它在创建后立即出现
输出窗口,所以我不知道为什么克隆框会影响
格式化?
output = Tab Box( "EASY Summary", output1, "Trend Graphs", output2 );
output_window = New Window( "F68 CofA Flagging Summary", output );
output_window << Save Interactive html(
path || "FlagSummaryAll" || "
Sigma=" || Char( sigma ) || " Days=" || Char( Days ) || ".html"
);
回复:For循环变量图参考线谢谢你! 这帮助我解决了这两个问题。Re: For循环变量图参考线尝试这样的事情
dt = Open( "$sample_data/big class.jmp" );
output2 = V List Box(); // vlist box of all the results
For( w = 1, w <= N Rows( dt ), w++, // for every row in *some* table (the original question uses a different table for this)
Stmt = dt:height[w]; // get some interesting value to subset with and make a subset...
// (This simplied answer is a little bit non-sensical without another table involved--it will make duplicate graphs)
dt << Clear Row States; // I think this is what you wanted, rather than clearing the column selection
dt << select where( dt:height == Stmt );
CofA_dt9a = dt << Subset( Output Table( "TempTable" || Char( w ) ) ); // make a subset
row1weight = CofA_dt9a:weight[1]; // use row 1 of the subset to get values that will
row1age = CofA_dt9a:age[1]; // be visible on the X and Y axes
output2 << append( // collect all the results here
V List Box( // a list of 1 box; bivariate attaches to this vlist rather than making a window
(CofA_dt9a << Bivariate( Y( :weight ), X( :age ),
SendToReport( // the next line has a hyphen that appears to make stmt negative...
Dispatch({},"Bivariate Fit of weight By age",OutlineBox,{Set Title( "Parameter Value by shelf_life_start_date -" || Char( stmt ) )}),
Dispatch( {}, "2", ScaleBox, {Add Ref Line( row1weight, "Solid", "Red", "row 1 weight", 1 )} ),
Dispatch( {}, "1", ScaleBox, {Label Row( Label Orientation( "Angled" ) ), Add Ref Line( row1age, "Solid", "Red", "row 1 age" )} ),
Dispatch({},"Bivar Plot",FrameBox,{Frame Size( 200, 100 )}
)
)
))
) << cloneBox // cloning the V List Box and the bivariate platform disconnects the clone from the data table
);
Close( CofA_dt9a, nosave ); // the subset is not needed after the clone
); //end row loop
Close( dt, nosave );
New Window( "output2", output2 );