Estoy un poco perdido con tener que agregar el resultado de esto en diapositivas ppt: mi objetivo es que cada diapositiva tenga 4 columnas y dos filas.
Esto es lo que he hecho hasta ahora.
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>Pruebe los parámetros << guardar presentación (). Aquí hay un ejemplo:
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" );
Esto coloca el cuadro de tabla y el análisis bivariado en páginas separadas. No estoy seguro de cómo ponerlo todo en una página.
Este tema ha sido respondido antes. aquí es el enlace a la misma.
