我正在运行 for 循环来选择不同的数据表并运行所选参数的变异性图表。 该脚本正在为每个数据表创建不同的报告日志。 任何人都可以帮我将所有报告期刊合并在一起吗?
var_chart= 函数 ({select_y,select_x},
当前数据表(dt_sub);
Rep_chart = 变异图(
Y( 评估 (select_y) ),
X( 评估 (select_x) ),
最大迭代次数( 100 ),
转化限制( 0.00000001 ),
数积分横坐标( 128 ),
数字函数评估( 65536 ),
分析类型(“选择最佳分析(EMS REML 贝叶斯)”),
标准差图表( 0 ),
变异性总结报告(1),
历史西格玛( 0 ),
显示组平均值( 1 ),
显示大平均值( 1 ),
显示箱线图( 1 )
),
Rep_var_chart = Rep_chart << 报告;
Rep_var_chart << 分页符;
Rep_var_chart << 日志窗口;
Rep_Jrn << 追加 (Rep_var_chart);
关闭(dt_sub,不保存);
);
马= 1;
col_name_list = {};
Rep_Jrn=新窗口("报告", << 日志);
对于 (l=1,l <= NItems (test_list), l++,
open_path1 = L_path1||test_list[l]||"_"||"Com"||".jmp";
dt_sub=打开(open_path1);
col_name_list[ma] = dt_sub << 获取列名 ();
//ma=ma+1;
新窗口(“选择测试进行分析”,<<模态,
V 列表框(
文本框(“选择Y,响应”),
para_select1 = 列表框( col_name_list[ma] ),
文本框(“选择X,响应”),
para_select2 = 列表框( col_name_list[ma] ),
Button Box( "OK", test_list1 = para_select1 << 被选中;
test_list2 = para_select2 << 被选中 ),
);
);
打印(测试列表1);
打印(测试列表2);
var_chart(test_list1,test_list2);
ma=ma+1;
//关闭(dt_sub,不保存);
);
以下是能够将平台输出附加到日志的示例。显然,您没有正确指向日记或报告输出。
Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/big class.jmp" );
nw = New Window( "example", <<JOURNAL></JOURNAL>
我尝试过,但它不起作用。 报错..
不是在访问或评估 'append' 时显示,append( Report( Rep_chart ) ) /*###*/
如果在你之后
ma = ma + 1;
你只需要添加
Rep_Jrn << append(report(Rep_chart));