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