topic Append Journals in Discussions

Append Journals

RK1 — Tue, 10 Jul 2018 18:06:14 GMT

i am running a for loop to select different data tables and run variability chart for select parameters. The script is creating different report journals for each data table. Can any one one please help me in merging all the report journals together.

Var_chart= Function ({select_y,select_x},
current data table (dt_sub);
Rep_chart = Variability Chart(
Y( Eval (select_y) ),
X( Eval (select_x) ),
Max Iter( 100 ),
Conv Limit( 0.00000001 ),
Number Integration Abscissas( 128 ),
Number Function Evals( 65536 ),
Analysis Type( "Choose best analysis (EMS REML Bayesian)" ),
Std Dev Chart( 0 ),
Variability Summary Report(1),
Historical Sigma( 0 ),
Show Group Means( 1 ),
Show Grand Mean( 1 ),
Show Box Plots( 1 )
),

Rep_var_chart = Rep_chart << Report;
Rep_var_chart << Page Break;
Rep_var_chart << Journal Window;
Rep_Jrn << Append (Rep_var_chart);

close (dt_sub, No Save);
);

ma =1;
col_name_list ={};
Rep_Jrn= New Window ("Report", << Journal);
For (l=1,l <= NItems (test_list), l++,
open_path1 = L_path1||test_list[l]||"_"||"Com"||".jmp";
dt_sub= open (open_path1);
col_name_list[ma] = dt_sub << get column names ();
//ma=ma+1;

New Window( "Select Tests for Analysis", <<Modal,

V List Box(

Text Box( "Select Y,Response" ),

para_select1 = List Box( col_name_list[ma] ),

Text Box( "Select X,Response" ),
para_select2 = List Box( col_name_list[ma] ),

Button Box( "OK", test_list1 = para_select1 << get selected;
test_list2 = para_select2 << get selected ),

);

);

print(test_list1);
print (test_list2);

Var_chart (test_list1,test_list2);

ma=ma+1;

//close(dt_sub, NO Save);
);

Re: Append Journals

txnelson — Tue, 10 Jul 2018 18:47:41 GMT

If after your

ma = ma + 1;

you just need to add

Rep_Jrn << append(report(Rep_chart));

Re: Append Journals

RK1 — Tue, 10 Jul 2018 19:57:54 GMT

i tried, but its not working. Giving an error..

Not a display in access or evaluation of 'append' , append( Report( Rep_chart ) ) /*###*/

Re: Append Journals

txnelson — Tue, 10 Jul 2018 20:40:13 GMT

Here is an example of being able to append platform output to a Journal. Apparently, you are not properly pointing to the journal, or to the report output.

Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/big class.jmp" );
nw = New Window( "example", <<journal );

dis = Distribution( Continuous Distribution( Column( :height ) ) );

nw << append( Report( dis ) );

dis << close window;

biv = Bivariate( Y( :height ), X( :weight ) );

nw << append( Report( biv ) );

biv << close window;