Mercurial > repos > guerler > charts
diff histogram.r @ 6:6a11aeb8bd39 draft
Uploaded
author | guerler |
---|---|
date | Thu, 17 Apr 2014 13:22:34 -0400 |
parents | cbdd329ab623 |
children | 2e2d92b2ae38 |
line wrap: on
line diff
--- 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)