comparison histogramdiscrete.r @ 51:bfd966f30073 draft

Uploaded

50:12eb81b00cd9

    for (key in names(columns)) {
        # load column data
        column <- as.numeric(columns[key])
        
        # ensure string column
        column_data <- sapply( table[column], as.character )
        
        # collect vectors in list
        m <- append(m, list(column_data))
    }
    
    # get alphabetically sorted bins

51:bfd966f30073

    for (key in names(columns)) {
        # load column data
        column <- as.numeric(columns[key])
        
        # ensure string column
        column_data <- as.character(table[column][[1]])
    
        # collect vectors in list
        m <- append(m, list(column_data))
    }
    
    # get alphabetically sorted bins