Add wrapper for total count normalization

[drisso]

SUM_FN = function (ei)
{
sums = colSums(ei)
eo = t(t(ei)*mean(sums)/sums)
return(eo)
}

[mbcole]

Fixed in fa8db85