Ciao,
Creo uno script di ciclo for per eliminare la colonna vuota (la colonna contiene solo N/D).
Funziona bene tranne che su un file, una colonna viene eliminata quando non dovrebbe.
Non sono sicuro di cosa c'è che non va
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));
);
);
Aggiungi delle stampe di supporto all'interno del ciclo for per vedere cosa succede con la colonna specifica. Di solito mi piace usare Show()
Names Default To Here(1);
dt = {};
dt_u = New Table("Untitled",
Add Rows(3),
New Column("Column 1", Character, "Nominal", Set Values({"N/A", "N/A", "N/A"})),
New Column("Column 2", Character, "Nominal", Set Values({"a", "", ""})),
New Column("Column 3", Character, "Nominal", Set Values({"b", "", ""})),
New Column("Column 4", Character, "Nominal", Set Values({"N/A", "N/A", ""}))
);
dt[1] = dt_u << get name;
d = 1;
For(i = N Cols(Datatable(dt[d])), i >= 1, i--,
Summarize(Data Table(dt[d]), temp = by(Column(i)));
If(i == 3,
show(temp);
);
If(N Items(temp) == 1 & temp[1] == "N/A",
show(temp);
Data Table(dt[d]) << delete columns(Column(i))
);
);