删除控制图轴标签我有一个脚本可以导入数据然后处理数据并制作控制图。 我为之编写的人不想要沿 x 轴的标签或刻度线。 我使用控制图生成器构建了控制图,并删除了 x 轴标签和刻度线,但是当我运行脚本时,它会将它们放回去。当脚本运行时,我在控制图生成器中所做的所有其他事情都会被复制。 有没有办法来解决这个问题? 这是我的脚本中与控制图相关的部分:
Control Chart Builder(
Size( 534, 440 ),
Show Two Shewhart Charts( 0 ),
Show Control Panel( 0 ),
Show Capability( 0 ),
Variables( Y( :Name( "0.5 Micron Particulate (part/m3)" ) ) ),
Chart( Points( Statistic( "Individual" ) ), Limits( Sigma ) ),
SendToReport(
Dispatch(
{},
"Control Chart Builder",
OutlineBox,
{Set Title( "IR Control Chart" )}
),
Dispatch(
{},
"0.5 Micron Particulate (part",
ScaleBox,
{Min( 0 ), Max( 400000 ), Inc( 50000 ), Minor Ticks( 0 ),
Add Ref Line( 125000, "Dashed", "Purple", "125000", 1 ),
Add Ref Line( 352000, "DashDotDot", "Cyan", "352000", 1 )}
),
Dispatch(
{},
"graph display 1 title",
TextEditBox,
{Set Text(
char(RM[r]) ||" 0.5 Micron Particulate (part/m3) "|| char(As Date(:Date[1]))|| " - " || char(As Date(:Date[NRows()]))
)}
)
)
);回复:删除控制图轴标签感谢您的帮助! 我把它放在我的脚本中并且效果很好!
回复:删除控制图轴标签此脚本通过删除 X 轴框来处理此问题
ccb=Control Chart Builder(
Size( 534, 440 ),
Show Two Shewhart Charts( 0 ),
Show Control Panel( 0 ),
Show Capability( 0 ),
Variables( Y( :Name( "0.5 Micron Particulate (part/m3)" ) ) ),
Chart( Points( Statistic( "Individual" ) ), Limits( Sigma ) ),
SendToReport(
Dispatch(
{},
"Control Chart Builder",
OutlineBox,
{Set Title( "IR Control Chart" )}
),
Dispatch(
{},
"0.5 Micron Particulate (part",
ScaleBox,
{Min( 0 ), Max( 400000 ), Inc( 50000 ), Minor Ticks( 0 ),
Add Ref Line( 125000, "Dashed", "Purple", "125000", 1 ),
Add Ref Line( 352000, "DashDotDot", "Cyan", "352000", 1 )}
),
Dispatch(
{},
"graph display 1 title",
TextEditBox,
{Set Text(
char(RM[r]) ||" 0.5 Micron Particulate (part/m3) "|| char(As Date(:Date[1]))|| " - " || char(As Date(:Date[NRows()]))
)}
)
)
);
report(ccb)[AxisBox(1)]<<DELETE></DELETE>