Mercurial > repos > guerler > charts
comparison histogramdiscrete.r @ 51:bfd966f30073 draft
Uploaded
author | guerler |
---|---|
date | Thu, 05 Jun 2014 13:37:22 -0400 |
parents | f92f68399023 |
children |
comparison
equal
deleted
inserted
replaced
50:12eb81b00cd9 | 51:bfd966f30073 |
---|---|
9 for (key in names(columns)) { | 9 for (key in names(columns)) { |
10 # load column data | 10 # load column data |
11 column <- as.numeric(columns[key]) | 11 column <- as.numeric(columns[key]) |
12 | 12 |
13 # ensure string column | 13 # ensure string column |
14 column_data <- sapply( table[column], as.character ) | 14 column_data <- as.character(table[column][[1]]) |
15 | 15 |
16 # collect vectors in list | 16 # collect vectors in list |
17 m <- append(m, list(column_data)) | 17 m <- append(m, list(column_data)) |
18 } | 18 } |
19 | 19 |
20 # get alphabetically sorted bins | 20 # get alphabetically sorted bins |