256350_zh-CN

liliconcom

表更新与获取行

你好

 

我有两个表，行数均超过5万，列数为5 -10列，我想用第二个表（dt2）中的值更新第一个表（dt1）。我不想使用循环，因为行> 50k可能会花费很多时间。JSL的“更新”功能运行良好，但我还需要dt2中的匹配行以供进一步使用。

为了说明我的意思，我使用了“脚本索引”中的“更新”示例，并在名称中加上了身高，体重，排名和代码。我需要一个具有匹配行数的列表。对于该示例，它将为{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} )
);

谢谢

回复：表更新与获取行

假设名称充当唯一标识符，这是一种对您有用的方法：

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);

回复：表更新与获取行

我建议您使用联接而不是更新。  如果安装正确，它将像更新一样工作，但是会添加新行。  它还将为您提供一列，指出添加了哪些行。

缺点是它创建了一个新的数据表，但是带有几个可以处理的语句，并且外观和感觉就像已完成更新一样。  看下面的代码：

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;

回复：表更新与获取行谢谢，这很好，行数也很大。回复：表更新与获取行谢谢，我尝试了这种方法，但是对于超过5万行的数据，它将花费很长时间。对于较小的桌子，效果很好。