Mercurial > repos > guerler > charts

comparison histogram.r @ 11:61a1d67f70d4 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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