Ich bin ein bisschen verloren, weil ich die Ausgabe in ppt-Folien anhängen muss - mein Ziel ist, dass jede Folie 4 Spalten und zwei Zeilen hat.
Folgendes habe ich bisher getan
params = New Window( "Parameters vs WEW (Design)",
V List Box(
Lineup Box( N Col( NST ),
For( i = 1, i <= N Items( colnamey ), i++,
biv = Bivariate(
Y( Column( dt, colnamey[i] ) ),
X( Column( dt, colnamex[i] ) ),
By( :STO ),
Group By( Column( dt, groupname ) ),
Fit Spline( 1000 )
);
rbiv = biv << report;
For( k = 1, k <= NST, k++,
rbiv[k][FrameBox( 1 )] << {Frame Size( 250, 200 ),
Marker Size( 0 ), Line Width Scale( 2 )};
rbiv[k][axis box( 2 )] <<
Tick Font( style( 1 ), size( 9 ) ) <<
Format( Best, 5 ) << Show Major Grid( 1 ) <<
Show Minor Grid( 1 ) << Show Minor Ticks( 1 );
rbiv[k][axis box( 1 )] <<
Tick Font( style( 1 ), size( 9 ) ) <<
Format( Best, 5 ) << Show Major Grid( 1 ) <<
Show Minor Grid( 1 ) << Show Minor Ticks( 1 );
rbiv[k][Text Edit Box( 2 )] << Set Font Size( 10 )
<< Set Font Style( "Bold" );
rbiv[k][Text Edit Box( 1 )] << Set Font Size( 10 )
<< Set Font Style( "Bold" );
);
For( b = 1, b <= N Items( GroupList ), b++,
fitcrve = "biv << (curve[" || Char( b ) ||
"]<<REPORT></REPORT>Versuchen Sie params << Präsentation speichern (). Hier ist ein Beispiel:
Names Default To Here( 1 );
Open( "$SAMPLE_DATA/Big Class.jmp" );
nw = new window("Example",
vlb = vlistbox(
table box(
string col box("Hello", {"ABC", "DEF", "GHI"}),
number col box("World", {100, 200, 300}),
),
biv = bivariate( y( :weight ), x( :height ) ),
)
);
nw << Save Presentation( "$TEMP/jmp_example.pptx" );
Open( "$TEMP/jmp_example.pptx" );
Dadurch werden die Tabellenbox und die bivariate Analyse auf separaten Seiten angezeigt. Ich bin mir nicht sicher, wie ich alles auf eine Seite bringen soll.
Dieses Thema wurde bereits beantwortet. Hier ist der Link dazu.