fixed a few typos and other small changes

diff --git a/zerosum.R b/zerosum.R
index 1dfba92f82a8510285153ca171b99d25147d687e..5c2a0f504a8e57fff07cbe745b4dfca16ccf5486 100644 (file)
--- a/zerosum.R
+++ b/zerosum.R
@@ -153,4 +153,4 @@ gen.cost <- function (x) {
 
 e <- do.call("rbind", by(d, seq(1,dim(d)[1]), gen.cost))
 round(apply(e, 2, sum))
-ls
+