769193_de-DE

liliconcom

Schnellere Iteration

Hallo,

Versuch, die Iterationen zu optimieren.

Ich habe eine Referenztabelle, in der jede Spalte ein Name aus einer Spalte der Hauptdatentabelle ist. Ich möchte jede Zeile der Referenzdatentabelle durchlaufen und dann die Werte aus Column(dt_main, „Values“) zu den neuen Spalten A und B in der Referenztabelle hinzufügen, wenn Column(dt_ref, „Nrows“)>2 & Comment[i] == „A > B“.

Ich verwende ein assoziatives Array, da mich nur die zuletzt aufgezeichneten Werte jedes Typs A und B interessieren, die der entsprechenden X/Y/Wafer-ID zugeordnet sind.

Das folgende Skript dauert sehr lange. Gibt es eine Möglichkeit zur Optimierung?

Names Default To Here( 1 );
start = Tick Seconds();
dt_main = Data Table( "maintable" );
dt_ref = Data Table( "referencetable" );


Try( dt_ref << delete columns( :New N, :New R ) );
dt_ref << New Column( "New A", "Numeric" );
dt_ref << New Column( "New B", "Numeric" );
nrows = [];

For( nn = 1, nn <= N Rows( dt_ref ), nn++, 
	
	Insert Into( nrows, nn )
);

dt_ref << begin data update;
For Each( {r, i}, nrows, 
	
	
	If( dt_ref:N Rows[i] > 2 & dt_ref:Comment[i] == "A > B", 
/// Create AA to get the last recorded values for each A and B to the corresponding X/Y/Wafer ID from dt_main
		countsessions = Associative Array(
			dt_main:Type[dt_main << get rows where( dt_main:X Coord == dt_ref:X Coord[i] & dt_main:Y Coord == dt_ref:Y Coord[i] & dt_main:Wafer ID == dt_ref:Wafer ID[i] )], 
			
			dt_main:Value[dt_main << get rows where( dt_main:X Coord == dt_ref:X Coord[i] & dt_main:Y Coord == dt_ref:Y Coord[i] & dt_main:Wafer ID == dt_ref:Wafer ID[i] )];
			
		);
		
		Try( dt_ref:New A[i] = countsessions["A"] );
		Try( dt_ref:New B[i] = countsessions["B"] );
		
	)
);

dt_ref << end data update;
end = Tick Seconds();

Show( Char( end - start ) );

Automatisierung und SkriptingBetreff: Schnellere Iteration

Ich habe einen anderen Weg gewählt und die integrierten JMP-Plattformen Select, Join, Split und Update verwendet. Das funktioniert sehr schnell und ich scheine dieselben Ergebnisse zu erhalten, mit Ausnahme der A>B-Zeilen, die in Ihrer Referenztabelle fehlende Werte aufweisen ... aber die Werte, die ich erhalte, stimmen mit den Spalten N(A) und N(b) überein. Ich kann also völlig auf dem Holzweg sein.

Names Default To Here( 1 );
start = Tick Seconds();
dt_main = Data Table( "maintable" );
dt_ref = Data Table( "referencetable" );


Try( dt_ref << delete columns( :New A, :New B ) );

// Create a subset of the maintable that contains only data for the rows in
// the reference table that have comment value of A>B
// Select only A>B rows in reference table
dt_ref << select where(:Comment == "A > B");
dtAB = dt_ref<<SUBSET>0, dtMainJoin << delete rows);
dtMainJoin = dtMainJoin << sort(by(:RowNum), Order(ascending), Replace table(1));
dtMainJoin << delete columns(:RowNum);

// Split the table to create the New A and New B Columns
dtSplit = dtMainJoin <<
Split(
	Split By( :Type ),
	Split( :Value ),
	Group( :X Coord, :Y Coord, :Wafer ID ),
	Output Table(
		"Split of Join of maintable with Subset of referencetable 2 by Type"
	),
	Sort by Column Property
);

// Clean up dtMainJoin table by closing it
close(dtMainJoin, nosave);

// Rename the A and B columns
dtSplit:A << set name("New A");
dtSplit:B << set name("New B");

// Use Update to merge the dtSplit data into the reference table
dt_ref << Update(
	With(
		Data Table(
			dtSplit
		)
	),
	Match Columns( :X Coord = :X Coord, :Y Coord = :Y Coord, :Wafer ID = :Wafer ID )
);

// Clean up
close( dtSplit, nosave );

dt_ref << end data update;
end = Tick Seconds();

Show( Char( end - start ) );</SUBSET>