246166_it-IT

liliconcom

Ri: Fit Group Automate

aggiornamento: risolto il problema con la parte di output, ora esce da 1-23, il mio problema è come aggiungerlo a ppt disposti in 2 o 3 grafici per diapositiva?

Ri: Fit Group Automate

Per quanto riguarda l'errore sul parametro 9 .... qual è l'errore visualizzato nel registro?

Di seguito è una modifica del codice che visualizzerà tutti gli output in 2 colonne.  Ha anche il codice per salvare l'output in PowerPoint.

Current Data Table( subs );

nw = New Window( "Oneways",
 Lineup Box( N Col( 2 ),
  For( i = 1, i <= N Items( parameters_1 ), i++,
   Print( i );
   Oneway(
    X( :Recipe ),
    Y( Column( subs, parameters_1[i] ) ),
    With Control( 1 ),
    Quantiles( 1 ),
    Means and Std Dev( 1 ),
    CDF Plot( 1 ),
    Mean Error Bars( 1 ),
    Std Dev Lines( 1 ),
    SendToReport(
     Dispatch(
      {},
      "Fit Group",
      OutlineBox,
      {Set Title( "TYPE=" || Char( type ) || "" )}
     )
    )
 
   );, 
 
  )
 )
);
nw << save presentation("$TEMP\reportppnw.pptx");

Tuttavia, questo non visualizzerà 2 grafici per pagina.  Per convenzione, JMP posizionerà ciascun grafico su una diapositiva separata.  Per gestirlo, in genere creo un giornale in cui le coppie di output sono state copiate come immagini e, alla fine, il giornale viene salvato in un pptx.  Per questo, qualcosa come sotto potrebbe funzionare.

Names Default To Here( 1 );
Current Data Table( subs );

For( i = 1, i <= N Items( parameters_1 ), i = i + 2,
 hlb = H List Box(
  Oneway(
   X( :Recipe ),
   Y( Column( subs, parameters_1[i] ) ),
   With Control( 1 ),
   Quantiles( 1 ),
   Means and Std Dev( 1 ),
   CDF Plot( 1 ),
   Mean Error Bars( 1 ),
   Std Dev Lines( 1 ),
   SendToReport(
    Dispatch(
     {},
     "Fit Group",
     OutlineBox,
     {Set Title( "TYPE=" || Char( type ) || "" )}
    )
   )
 
  ),
  Try(
   Oneway(
    X( :Recipe ),
    Y( Column( subs, parameters_1[i + 1] ) ),
    With Control( 1 ),
    Quantiles( 1 ),
    Means and Std Dev( 1 ),
    CDF Plot( 1 ),
    Mean Error Bars( 1 ),
    Std Dev Lines( 1 ),
    SendToReport(
     Dispatch(
      {},
      "Fit Group",
      OutlineBox,
      {Set Title( "TYPE=" || Char( type ) || "" )}
     )
    )
 
   )
  );
  zippy = hlb << get picture;
  zippy << save presentation( "$TEMP\report.pptx", append );
 )
);

A proposito ..... Non ho testato completamente il codice.  Pertanto, potrebbe esserci un leggero problema o due, ma i concetti sono corretti.

Fit Group Automate

Sto lavorando con questo codice ma in qualche modo sull'uscita 9, viene visualizzato un errore. Parametri_1 contiene 23 elementi su di esso.

 

 

current data table(subs);
for (i = 1, i <= nitems(parameters_1), i++,
&nbsp;&nbsp;&nbsp; print(i);
&nbsp; Oneway(
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; X( :Recipe ),
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Y( column(subs, parameters_1[i]) ),
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; With Control(1),
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Quantiles(1),
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Means and Std Dev(1),
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; CDF Plot(1),
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Mean Error Bars(1),
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Std Dev Lines(1),
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; SendToReport( Dispatch(&nbsp; {}, "Fit Group", OutlineBox, {Set Title( "TYPE="||char(type)||"" )} ) )

&nbsp;&nbsp;&nbsp; );

);

 

Le uscite da 1-8 sono mostrate singolarmente. Come posso codificare in modo tale che il mio output sia organizzato per 2 e salvarlo in un ppt.

Ri: Fit Group Automategrazie per questo!Ri: Fit Group Automate

 

Fit Group(
 For( i = 1, i <= N Items( parameters_1 ), i = i + 2,
  hlb = H List Box(
   Oneway(
    X( :Recipe ),
    Y( Try( Column( subs, parameters_1[i] ) ) ),
    With Control( 1 ),
    Quantiles( 1 ),
    Means and Std Dev( 1 ),
    CDF Plot( 1 ),
    Mean Error Bars( 1 ),
    Std Dev Lines( 1 )

   ),
   Try(
    Oneway(
     X( :Recipe ),
     Y( Column( subs, parameters_1[i + 1] ) ),
     With Control( 1 ),
     Quantiles( 1 ),
     Means and Std Dev( 1 ),
     CDF Plot( 1 ),
     Mean Error Bars( 1 ),
     Std Dev Lines( 1 )
    )
   );
   zippy = hlb << get picture;
  )
 )
);

 

Ho provato il codice che hai dato, ma in qualche modo questo mi dà un errore:

Non trovato nell'accesso o nella valutazione di "Oneway", Bad Argument (
{Prova (colonna (subs_top, parametri_1 [i])), il ruolo richiede almeno 1 colonna.}
), Oneway (/ * ### * / X (: ricetta),
Y (Prova (colonna (subs_top, parametri_1 [i]))),
Con controllo (1),
Quantili (1),
Means and Std Dev (1),
Trama CDF (1),
Barre di errore medie (1),
Std Dev Lines (1)
)

Fit Group []

Ri: Fit Group Automate

ma quando ho provato il codice mi è venuto in mente prima,

Current Data Table( subs );
t0p = Fit Group(
 For( i = 1, i <= N Items( parameters_1 ), i++,
  Oneway(
   X( Column( subs, "Recipe" ) ),
   Y( Try( Column( subs, parameters_1[i] ) ) ),
   With Control( 1 ),
   Quantiles( 1 ),
   Means and Std Dev( 1 ),
   CDF Plot( 1 ),
   Mean Error Bars( 1 ),
   Std Dev Lines( 1 )
  )
 ),
 SendToReport( Dispatch( {}, "Fit Group", OutlineBox, {Set Title( "TYPE=" || Char( type ) || "" )} ) )
) << {Arrange in Rows( 2 )};

funziona ma lo fa individualmente.