Mercurial > repos > guerler > charts
comparison histogram.r @ 11:61a1d67f70d4 draft
Uploaded
| author | guerler |
|---|---|
| date | Fri, 18 Apr 2014 15:11:06 -0400 |
| parents | 86068f6de925 |
| children | 9479e62342fa |
comparison
equal
deleted
inserted
replaced
| 10:86068f6de925 | 11:61a1d67f70d4 |
|---|---|
| 1 # utilities | 1 # utilities |
| 2 roundUp <- function(x) 10^ceiling(log10(x)) | 2 roundUp <- function(x) 10 * ceiling(x/10) |
| 3 roundDown <- function(x) 10^floor(log10(x)) | 3 roundDown <- function(x) 10 * floor(x/10) |
| 4 | 4 |
| 5 # wrapper | 5 # wrapper |
| 6 wrapper <- function(table, columns, options) { | 6 wrapper <- function(table, columns, options) { |
| 7 | 7 |
| 8 # initialize output list | 8 # initialize output list |