256350_zh-TW

liliconcom

使用獲取行更新表

你好，

 

我有兩個包含 > 50k 行和 5 -10 列的表，我想使用第二個表 (dt2) 中的值更新第一個表 (dt1)。 我不想使用循環，因為行數 > 50k 可能會花費大量時間。 JSL“更新”功能運行良好，但我還需要 dt2 中的匹配行以供進一步使用。

為了說明我的意思，我使用了“腳本索引”中的“更新”示例，並添加了姓名 MIKE 的身高、體重、排名和代碼。 我需要一個包含匹配行行數的列表。 對於該示例，它將是 {1, 2, 3}，因為 dt1 中不存在 MIKE。

Names Default To Here( 1 );
dt1 = Open( "$SAMPLE_DATA/Big Class.jmp" );
dt2 = New Table( "Little Class",
 Add Rows( 3 ),
 New Column( "name", Character, Nominal, Set Values( {"KATIE", "ALFRED", "HENRY", "MIKE"} ) ),
 New Column( "height", Continuous, Set Values( [999, 999, 999, 111] ) ),
 New Column( "weight", Continuous, Set Values( [999, 999, 999, 111] ) ),
 New Column( "RANK", Continuous, Set Values( [3, 1, 2, 9] ) ),
 New Column( "CODE", Continuous, Set Values( [0, 1, 1, 8] ) )
);
dt1 << Update(
 With( Data Table( "Little Class" ) ),
 Match Columns( :name = :name ),
 Add columns from Update table( {:RANK} ),
 Replace columns in Main Table( {:height} )
);

謝謝

回复：使用獲取行更新表謝謝，我嘗試了這種方法，但對於超過 50k 行，它會花費太長時間。 對於較小的桌子，這很有效。回复：使用獲取行更新表謝謝，這也適用於大量行。回复：使用獲取行更新表

我建議您使用 Join 而不是 Update。如果設置正確，它將像更新一樣工作，但會添加新行。它還將為您提供一列，指示添加了哪些行。

缺點是它創建了一個新的數據表，但只需幾條語句就可以處理，並且它看起來和感覺就像已完成更新一樣。看下面的代碼：

Names Default To Here( 1 );
dt1 = Open( "$SAMPLE_DATA/Big Class.jmp" );
dt2 = New Table( "Little Class",
 Add Rows( 3 ),
 New Column( "name", Character, Nominal, Set Values( {"KATIE", "ALFRED", "HENRY", "MIKE"} ) ),
 New Column( "height", Continuous, Set Values( [999, 999, 999, 111] ) ),
 New Column( "weight", Continuous, Set Values( [999, 999, 999, 111] ) ),
 New Column( "RANK", Continuous, Set Values( [3, 1, 2, 9] ) ),
 New Column( "CODE", Continuous, Set Values( [0, 1, 1, 8] ) )
);
dt3 = dt1 << Join(
 With( dt2),
 Merge Same Name Columns,
 By Matching Columns( :name = :name ),
 Drop multiples( 0, 0 ),
 Include Nonmatches( 1, 1 ),
 Preserve main table order( 1 )
);

name = dt1 << get name;

close(dt1, nosave );

dt3 << set name(name);
dt1 = dt3;

回复：使用獲取行更新表

假設名稱充當唯一標識符，以下是一種可能對您有用的方法：

Names Default To Here( 1 );
dt1 = Open( "$SAMPLE_DATA/Big Class.jmp" );
dt2 = New Table( "Little Class",
 Add Rows( 3 ),
 New Column( "name", Character, Nominal, Set Values( {"KATIE", "ALFRED", "HENRY", "MIKE"} ) ),
 New Column( "height", Continuous, Set Values( [999, 999, 999, 111] ) ),
 New Column( "weight", Continuous, Set Values( [999, 999, 999, 111] ) ),
 New Column( "RANK", Continuous, Set Values( [3, 1, 2, 9] ) ),
 New Column( "CODE", Continuous, Set Values( [0, 1, 1, 8] ) )
);
dt1 << Update(
 With( Data Table( "Little Class" ) ),
 Match Columns( :name = :name ),
 Add columns from Update table( {:RANK} ),
 Replace columns in Main Table( {:height} )
);

//Get names as associative arrays
names1 = Associative Array(dt1:name << Get values);
names2 = Associative Array(dt2:name << Get Values);

//Get the intersection (replaces names1)
names1 << Intersect(names2);

//Get intersection names as List
intersection = names1 << Get Keys;

//Find rows
update_rows = dt2 << Get Rows Where(contains(intersection, :name)>0);