I wish to save the summary data table and show in PowerPoint, so how can I do? Thank you.
dt1 = New Table( "Frequency Range", New Column( "Frequency Range", Character, "Nominal", Set Values( {"A", "B", "C", "D", "E", "F"} ) ) ) << Update( With( Data Table( "Final table" ) ) ); j1 = dt1 << journal; j1 << save presentation( "$TEMP/awaw.pptx" ); j1 << close window; Open( "$TEMP/awaw.pptx" );
Any example scripts for that? How to convert to journal and show in pptx format?
One more question here, after that I want to save this table in the same pptx file with the graph that I have saved before, how can I do that?
myhlb = H List Box(); myhlb << append( Report( gb1 ) ); myhlb << append( Report( gb2 ) ); myhlb << append( Report( gb3 ) ); myhlb2 = H List Box(); myhlb2 << append( myhlb << get picture ); myhlb2 << save presentation( "gbgb.pptx" ); Open( "gbgb.pptx" );
This is the scripts that I used to save my graph in pptx format.
You will need to restructure your code, to place the H List Box() and/or the picture into the Journal where you have the data table, and then save the Journal. You also might look into using a New Data Box() to handle it. Here is the example taken from the Scripting Index on the New Data Box()
Names Default To Here( 1 ); dtA = Open( "$SAMPLE_DATA/Big Class.jmp", invisible ); New Window( "school", H List Box( dtA << New Data Box(), Text Box(), dtA << Distribution( ContinuousDistribution( Column( :weight ) ), NominalDistribution( Column( :age ) ) ) ) ); dtA = 0;