如何将行图例添加到控制图表报表和隐藏数据表你好,
创建控制图脚本后,我该如何:
1) 基于TOOL在PLOTS窗口中添加Row Legend?
2) 隐藏数据表,但保持 PLOTS 屏幕可见?
dt = 打开数据库(“数据库 1”,
“选择
MEAS1,
测试日期,
工具
来自 Data_Table_1
其中 Test_Date > sysdate - 365
按测试日期升序排列
",
“dt”
);
dt << Color by Column( :TOOL, Color Theme( "JMP Dark" ) );
新窗口(“地块”,
V 列表框(
dt << 控制图(
标记大小( 4 ),
样品标签(:TEST_DATE),
团体人数( 1 ),
K西格玛(3),
图表列(
:MEAS1, Individual Measurement( Show Zones( 3 ), Shade Zones( 1 ), Sigma( 1.73e+17 ), Avg( 1.20e+18 ), LCL( 6.77e+17 ), UCL( 1.73e+18 ) )
))));
Try( dt << 关闭窗口 );
回复:如何添加行图例以控制图表报告和隐藏数据表惊人的!
非常感谢!
回复:如何添加行图例以控制图表报告和隐藏数据表以下是更正后的脚本。更正记录在脚本索引中
帮助==>脚本索引
dt = Open Database(
"Database1",
"SELECT
MEAS1,
TEST_DATE,
TOOL
FROM Data_Table_1
where Test_Date > sysdate - 365
order by test_date asc
",
"dt"
);
dt << Color by Column( :sex, Color Theme( "JMP Dark" ) );
New Window( "PLOTS",
V List Box(
cc = dt << Control Chart(
Marker Size( 4 ),
Sample Label( :TEST_DATE ),
Group Size( 1 ),
KSigma( 3 ),
Chart Col(
:MEAS1,
Individual Measurement(
Show Zones( 3 ),
Shade Zones( 1 ),
Sigma( 1.73e+17 ),
Avg( 1.20e+18 ),
LCL( 6.77e+17 ),
UCL( 1.73e+18 )
)
)
)
)
);
report(cc)[framebox(1)]<< row legend("TOOL");
dt<<SHOW window=""></SHOW>