まあ、それが私がする必要があることです。
私は似たようなスクリプトを探すことを試みました、しかし私は解決策を見つけませんでした。
前もって感謝します。
メネル
これはすべてゼロであるすべての列を削除する簡単なスクリプトです。
Names Default To Here( 1 );
dt = Current Data Table();
numericColNames = dt << get column names( string, numeric );
allZerosList = {};
For( i = 1, i <= N Items( numericColNames ), i++,
If( Col Sum( Column( dt, numericColNames[i] ) ) == 0
& Col Std Dev( Column( dt, numericColNames[i] ) ) == 0,
Insert Into( allZerosList, numericColNames[i] )
)
);
If( N Items( allZerosList ) > 0,
dt << delete columns( allZerosList )
); 次のようなことができます。
If(
N Rows( dt << get rows where( Column( dt, numericColNames[i] ) == 0 ) ) >
N Rows( dt ) / 2,
Insert Into( allZerosList, numericColNames[i] )
);