928905_zh-TW

liliconcom

分組洗牌

在大班課上，學生必須寫信給同年齡的另一位學生（學生 A 寫信給學生 A 是可以的）。
我可以使用哪個列公式來新增名稱_2 ？

即使有數百萬行，該公式也應該運行得很快。

自動化和腳本編寫回覆：分組洗牌

變通方法：虛擬表 - 洗牌 - 連接

Names Default to Here(1);
dt1 = Open( "$SAMPLE_DATA/Big Class Families.jmp" );
New Column( "Rank1",	Formula( Col Rank( 1, :age ) ));
New Column( "Rank2",	Formula( Col Rank( random integer (100000), :age ) ));

New Column( "name 2", Character,	"Nominal",	Formula( :name ));
New Column( "age 2", Formula( :age ));

dt2 = dt1 << Subset( All rows, Selected columns only( 0 ) );

dt1 << Join(
	With( dt2 ),
	Match Flag( 0 ),
	Suppress main table formula evaluation( 0 ),
	Select( :name, :age ),
	SelectWith( :name 2, :age 2 ),
	By Matching Columns( :age = :age, :Rank1 = :Rank2 ),
	Drop multiples( 0, 0 ),
	Include Nonmatches( 1, 1 )
);

回覆：分組洗牌

無效的變通方法：自連接
為什麼？

Names Default to Here(1);
dt1 = Open( "$SAMPLE_DATA/Big Class Families.jmp" );
New Column( "Rank1",	Formula( Col Rank( 1, :age ) ));
New Column( "Rank2",	Formula( Col Rank( random integer (100000), :age ) ));

New Column( "name 2", Character,	"Nominal",	set each value( :name ));
New Column( "age 2", set each value ( :age ));

//dt2 = dt1 << Subset( All rows, Selected columns only( 0 ) );

dt1 << Join(
	With( dt1 ),
	Select( :name, :age ),
	SelectWith( :name 2, :age 2 ),
	By Matching Columns( :age = :age 2, :Rank1 = :Rank2 ),
	Drop multiples( 0, 0 ),
	Include Nonmatches( 1, 1 )
);

回覆：分組洗牌

合併列 At() 和列 Shuffle()

Names Default To Here(1);

dt = open("$SAMPLE_DATA/Big Class.jmp");

new_col = dt << New Column("Shuffle",
	Character,
	Nominal,
	Formula(Col At(:name, Col Shuffle(:age), :age))
);

我沒有驗證結果，也沒有測試速度。

回覆：分組洗牌

我被列隨機排列()函數卡住了：
如何將分組索引轉換為行索引？

啊，當然，使用分組索引作為col at(idx, byGroup) 的輸入——完美匹配！
這是新功能的絕佳範例。