[R] Deleting colmuns with 0's and also writing multple csv files

[K. Elo]

Hi!

Right, my solution did not take into accound paired negative values
summing up to zero.

This should work in all cases:

df[, which(colSums(df!=0)!=0)]

Kind regards,
Kimmo