Come scrivere un copia/incolla di un grafico per un uso personalizzato in una nuova finestra?Vorrei riassumere numerosi insiemi di dati nei grafici di controllo e visualizzare tutti i grafici in modo gradevole su un modulo (nuova finestra) utilizzando le funzioni casella di riepilogo h e casella di riepilogo v. Quindi sono in mente alcuni script da copiare/incollare in qualche modo.
Nel consolidare così tanti grafici, lo spazio nella nuova finestra inizia a essere limitato. Quindi vorrei non includere la casella di contorno superiore nella visualizzazione di ogni grafico che ha sempre il titolo predefinito "Grafico di controllo".
Tuttavia, vorrei in tutti i casi preservare la seconda casella di contorno poiché mi offre un titolo personalizzato per ogni grafico.
In allegato sono riportati esempi dell'utilizzo della "casella di riepilogo h" che ho in mente.
Se è più facile copiare e incollare il contenuto della cornice, fammelo sapere. Potrei quindi semplicemente utilizzare le caselle di testo sopra ogni grafico di controllo nel mio consolidamento. Se questa opzione è la migliore, commenta come utilizzare al meglio il contenuto del frame di copia e incolla il contenuto del frame.
Il pdf allegato potrebbe essere più facile da capire perché il mio obiettivo è mostrato visivamente.
Grazie!
Re: Come creare uno script di copia/incolla di un grafico per un uso personalizzato in una nuova finestra?Grazie anche per questa risposta!
Re: Come creare uno script di copia/incolla di un grafico per un uso personalizzato in una nuova finestra?Per aggiungere al post di Jim:
- Le Line Up Box sono utili per questo genere di cose e
- Puoi impostare le dimensioni della pagina in modo che si adattino perfettamente a un foglio di carta.
Names Default To Here( 1 );
dt = Current Data Table();
cc1 = Control Chart( invisible, Sample Label( :Sample ), Group Size( 1 ), KSigma( 3 ), Chart Col( :Y1, Individual Measurement ) );
cc2 = Control Chart( invisible, Sample Label( :Sample ), Group Size( 1 ), KSigma( 3 ), Chart Col( :Y2, Individual Measurement ) );
cc3 = Control Chart( invisible, Sample Label( :Sample ), Group Size( 1 ), KSigma( 3 ), Chart Col( :Y3, Individual Measurement ) );
cc4 = Control Chart( invisible, Sample Label( :Sample ), Group Size( 1 ), KSigma( 3 ), Chart Col( :Y4, Individual Measurement ) );
win = New Window( "Test", lub = Line Up Box( N Col(2) ) );
lub << append( Report( cc1 )[Outline Box( 2 )] );
lub << append( Report( cc2 )[Outline Box( 2 )] );
lub << append( Report( cc3 )[Outline Box( 2 )] );
lub << append( Report( cc4 )[Outline Box( 2 )] );
lub << append( Report( cc1 )[Outline Box( 2 )] );
win << Set page setup(
margins( 0.5, 0.5, 0.5, 0.5 ),
scale( 1.0 ),
portrait( 0 ),
paper size( "Letter" )
);
fn = "$TEMP/JMP PDF Example.pdf";
win << Save PDF( fn );
Open( fn );
wait( 10 );
Delete File( fn )Re: Come creare uno script di copia/incolla di un grafico per un uso personalizzato in una nuova finestra?Ecco un modo per fare quello che vuoi
Names Default To Here( 1 );
dt = Current Data Table();
cc1 = Control Chart( invisible, Sample Label( :Sample ), Group Size( 1 ), KSigma( 3 ), Chart Col( :Y1, Individual Measurement ) );
cc2 = Control Chart( invisible, Sample Label( :Sample ), Group Size( 1 ), KSigma( 3 ), Chart Col( :Y2, Individual Measurement ) );
cc3 = Control Chart( invisible, Sample Label( :Sample ), Group Size( 1 ), KSigma( 3 ), Chart Col( :Y3, Individual Measurement ) );
cc4 = Control Chart( invisible, Sample Label( :Sample ), Group Size( 1 ), KSigma( 3 ), Chart Col( :Y4, Individual Measurement ) );
win = New Window( "Test",
hlb1 = H List Box(
),
hlb2 = H List Box(
)
);
hlb1 << append( Report( cc1 )[Outline Box( 2 )] );
hlb1 << append( Report( cc2 )[Outline Box( 2 )] );
hlb2 << append( Report( cc3 )[Outline Box( 2 )] );
hlb2 << append( Report( cc4 )[Outline Box( 2 )] );