Mercurial > repos > guerler > charts

comparison boxplot.r @ 2:a3b34c760a79 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author guerler
date Thu, 17 Apr 2014 11:19:06 -0400
parents
children e10dbc437d8f
comparison
equal deleted inserted replaced
1:f2d42848d165 2:a3b34c760a79
1 wrapper <- function(table, columns, options) {
2
3 # initialize output list
4 l <- list()
5
6 # loop through all columns
7 for (key in names(columns)) {
8 # load column data
9 column <- as.numeric(columns[key])
10 column_data <- sapply( table[column], as.numeric )
11
12 # create hist data
13 data <- boxplot(column_data, plot=FALSE)
14
15 # collect vectors in list
16 l <- append(l, list(data$stats))
17 }
18
19 # return
20 return (l)
21 }