Mercurial > repos > guerler > charts
changeset 55:680cf68098d5 draft
Uploaded
author | guerler |
---|---|
date | Thu, 05 Jun 2014 14:23:41 -0400 |
parents | 15a18f472cd9 |
children | 8a5b168df5f8 |
files | heatmap.r |
diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/heatmap.r Thu Jun 05 13:38:55 2014 -0400 +++ b/heatmap.r Thu Jun 05 14:23:41 2014 -0400 @@ -11,7 +11,8 @@ # access a label column get_label <- function(table, column_key) { column <- as.numeric(column_key) - return (c(table[column])) + column_data <- as.character(table[column][[1]]) + return (c(column_data)) } # inflate three columns into matrix