やあ、
空の列を削除する for ループ スクリプトを作成します (列には N/A のみが含まれます)。
1つのファイルを除いて問題なく動作し、想定外の場合に1つの列が削除されます。
何が悪いのかわからない
for (i= ncols (dt[d]),i>=1,i--,
summarize(data table(dt[d]),temp = by(column(i)));
if(nitems(temp) ==1 & temp[1]=="N/A",
data table(dt[d])<< delete columns(column(i));
);
);