for ループを実行して、さまざまなデータテーブルを選択し、選択したパラメーターの変動グラフを実行しています。 スクリプトは、データ テーブルごとに異なるレポート ジャーナルを作成します。 どなたか、すべてのレポートジャーナルを統合するのを手伝っていただけませんか。
Var_chart= 関数 ({select_y,select_x},
現在のデータテーブル (dt_sub);
Rep_chart = 変動チャート(
Y( Eval (select_y) ),
X( Eval (select_x) ),
最大イター( 100 )、
コンバージョン制限( 0.00000001 )、
数値積分横座標( 128 )、
数値関数 Evals( 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、保存なし);
);
ma = 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 << 列名を取得 ();
//マ=マ+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 << 選択を取得 )、
);
);
print(test_list1);
印刷 (test_list2);
Var_chart (test_list1,test_list2);
マ=マ+1;
//close(dt_sub, NO Save);
);
以下は、プラットフォーム出力をジャーナルに追加できる例です。どうやら、ジャーナルまたはレポート出力を正しく指定していないようです。
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));