如何快速计算> 2的列总数？计算似乎很简单，但是我没有快速的方法：
计算每列中> 2的总数，并获得新表。
谢谢！
dt = Open( "$SAMPLE_DATA\Data\Missing Data Pattern.jmp" );
脚本编写回复：如何快速计算> 2的列总数？请找到一种方法（无疑有很多方法）。 使用“帮助>脚本编制索引”确定其工作原理以及如何对其进行改进。
NamesDefaultToHere(1);
// Make a table with some (integer) values
nr = 10;
nc = 5;
dt = AsTable(J(nr, nc, RandomInteger(1, 5)));
dt << setName("Integers Between 1 and 5");
// Start here . . .
dt = CurrentDataTable();
// Get the data into a matrix
m = dt << getAsMatrix;
// Only keep values above the threshold (of 2)
m[Loc(m <= 2)] = .;
// Set all remaining values to 1
m =!IsMissing(m);
// Sum every column, and make a table
dt2 = AsTable(VSum(m));
dt2 << setName("Number of Values Above 2");
