729128_it-IT

liliconcom

Come creare un grafico a scatola e salvarlo in locale, quindi inserirlo in ppt

Ciao JMPer

Avevo uno dei dati di test come di seguito.

Voglio creare automaticamente un grafico a scatola in grado di confrontare ogni colonna con Fixture e ciascuna colonna ha un'osservazione. (Il formato del titolo: Fixture Comparison：Col--Remark).

Come costruire automaticamente il loop del grafico boxplot con Col_1、Col_2、Col_3、Col_4. E il grafico boxplot viene salvato automaticamente e quindi inserito in ppt?

Grazie mille.

Automazione e scriptingAnalisi e modellazione dei dati di baseRe: Come creare un grafico a scatola e salvarlo in locale, quindi inserirlo in ppt

Carica i dati del test.

Re: Come creare un grafico boxplot e salvarlo in locale, quindi inserirlo in ppt

Non ho molta esperienza nel salvataggio di presentazioni PowerPoint, ma questo script fa quello che hai chiesto, assumendo ogni volta lo stesso formato di colonna. Consente più o meno colonne :Col_n senza la necessità di apportare modifiche.

<MMM><YYYY> <HH24><MM><SS>" ) ); cols = Filtra ciascuno( {val, idx}, dt << Ottieni nomi di colonna( "String" ), Contiene( val, "Col_" ) ); commentarray = Array associativo( :Col, :Remark ); For Each( {val, idx}, cols, text = val || "--" || commentarray[Sostituisci( val, "_", "" )]; pres = dt << Costruttore di grafici( Dimensioni ( 534, 450 ) , Mostra pannello di controllo( 0 ), Variabili( X( :Fixture ), Y( Colonna( val ) ) ), Elementi( Punti( X, Y, Legenda( 7 ) ), Box plot( X, Y, Legenda( 8 ) ) ), SendToReport( Dispatch( {}, "graph title", TextEditBox, {Set Text( "Fixture Comparison: " || text )} ) ) ); If( idx == 1, Report( pres ) << Salva presentazione ( "$DOCUMENTI/Fixtures " || thedate || ".pptx" ), Report( pres ) << Salva presentazione( "$DOCUMENTI/Fixtures " || thedate || ".pptx", Aggiungi ) ); (pres < < Ottieni finestra) << Chiudi finestra;<BR /> );</SS></MM></HH24></YYYY></MMM>Names Default To Here( 1 );
dt = Open(
	"$DOWNLOADS/jmp test data.xlsx",
	Worksheets( "Sheet1" ),
	Use for all sheets( 1 ),
	Concatenate Worksheets( 0 ),
	Create Concatenation Column( 0 ),
	Worksheet Settings(
		1,
		Has Column Headers( 1 ),
		Number of Rows in Headers( 1 ),
		Headers Start on Row( 1 ),
		Data Starts on Row( 2 ),
		Data Starts on Column( 1 ),
		Data Ends on Row( 0 ),
		Data Ends on Column( 0 ),
		Replicated Spanned Rows( 1 ),
		Replicated Spanned Headers( 0 ),
		Suppress Hidden Rows( 1 ),
		Suppress Hidden Columns( 1 ),
		Suppress Empty Columns( 1 ),
		Treat as Hierarchy( 0 ),
		Multiple Series Stack( 0 ),
		Import Cell Colors( 0 ),
		Limit Column Detect( 0 ),
		Column Separator String( "-" )
	)
);
thedate = Uppercase( Format( Today(), "Format Pattern", "

Re: Come creare un grafico boxplot e salvarlo in locale, quindi inserirlo in ppt

Ciao, mmarchandTSI

Grazie mille. "Array associativo" è utile per me.

L'immagine salvata in PPT non è bella.

Voglio salvare l'immagine su ppt in questo modo. È possibile?

Re: Come creare un grafico boxplot e salvarlo in locale, quindi inserirlo in ppt

Puoi copiare le immagini negli appunti e incollarle in PPT tramite uno script PowerShell, come avviene nella barra degli strumenti del generatore di grafici

Re: Come creare un grafico a scatola e salvarlo in locale, quindi inserirlo in ppt

Questo metodo manterrà il formato originale di Graph Builder utilizzando alcune righe di codice in più.

 Names Default To Here( 1 );
dt = Open(
	"$DOWNLOADS/jmp test data.xlsx",
	Worksheets( "Sheet1" ),
	Use for all sheets( 1 ),
	Concatenate Worksheets( 0 ),
	Create Concatenation Column( 0 ),
	Worksheet Settings(
		1,
		Has Column Headers( 1 ),
		Number of Rows in Headers( 1 ),
		Headers Start on Row( 1 ),
		Data Starts on Row( 2 ),
		Data Starts on Column( 1 ),
		Data Ends on Row( 0 ),
		Data Ends on Column( 0 ),
		Replicated Spanned Rows( 1 ),
		Replicated Spanned Headers( 0 ),
		Suppress Hidden Rows( 1 ),
		Suppress Hidden Columns( 1 ),
		Suppress Empty Columns( 1 ),
		Treat as Hierarchy( 0 ),
		Multiple Series Stack( 0 ),
		Import Cell Colors( 0 ),
		Limit Column Detect( 0 ),
		Column Separator String( "-" )
	)
);
thedate = Uppercase( Format( Today(), "Format Pattern", "<DL><DD><MMM><YYYY> <HH24><MM><SS>" ) );
cols = Filter Each( {val, idx}, dt << Get Column Names( "String" ), Contains( val, "Col_" ) );
remarkarray = Associative Array( :Col, :Remark );
For Each( {val, idx}, cols,
	text = val || "--" || remarkarray[Substitute( val, "_", "" )];
	pres = dt << Graph Builder(
		Size( 534, 450 ),
		Show Control Panel( 0 ),
		Variables( X( :Fixture ), Y( Column( val ) ) ),
		Elements( Points( X, Y, Legend( 7 ) ), Box Plot( X, Y, Legend( 8 ) ) ),
		SendToReport( Dispatch( {}, "graph title", TextEditBox, {Set Text( "Fixture Comparison: " || text )} ) )
	);
	Report(pres)<<SAVE picture=""></SAVE></SS></MM></HH24></YYYY></MMM></DD><P><CODE class=" language-jsl"> 

Re: Come creare un grafico a scatola e salvarlo in locale, quindi inserirlo in ppt

Grazie hogi. Ho usato MAC, ma la barra degli strumenti non funziona per me.