Mercurial > repos > guerler > charts
comparison histogram.r @ 6:6a11aeb8bd39 draft
Uploaded
author | guerler |
---|---|
date | Thu, 17 Apr 2014 13:22:34 -0400 |
parents | cbdd329ab623 |
children | 2e2d92b2ae38 |
comparison
equal
deleted
inserted
replaced
5:cbdd329ab623 | 6:6a11aeb8bd39 |
---|---|
24 } | 24 } |
25 | 25 |
26 # make sure length is fine | 26 # make sure length is fine |
27 n <- max(sapply(l, length)) | 27 n <- max(sapply(l, length)) |
28 ll <- lapply(l, function(X) { | 28 ll <- lapply(l, function(X) { |
29 c(as.character(X), rep('undefined', times = n - length(X))) | 29 c(as.character(X), rep('2147483647', times = n - length(X))) |
30 }) | 30 }) |
31 l <- do.call(cbind, ll) | 31 l <- do.call(cbind, ll) |
32 | 32 |
33 # return | 33 # return |
34 return (l) | 34 return (l) |