# HG changeset patch
# User guerler
# Date 1397755354 14400
# Node ID 6a11aeb8bd39e80e6c257a6505118b1fdb7e6225
# Parent  cbdd329ab623b41370bf1d8c5eb2e4823def59ca
Uploaded

diff -r cbdd329ab623 -r 6a11aeb8bd39 histogram.r
--- a/histogram.r	Thu Apr 17 12:45:29 2014 -0400
+++ b/histogram.r	Thu Apr 17 13:22:34 2014 -0400
@@ -26,7 +26,7 @@
     # make sure length is fine
     n <- max(sapply(l, length))
     ll <- lapply(l, function(X) {
-        c(as.character(X), rep('undefined', times = n - length(X)))
+        c(as.character(X), rep('2147483647', times = n - length(X)))
     })
     l <- do.call(cbind, ll)