Mercurial > repos > guerler > charts

diff heatmap.r @ 55:680cf68098d5 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author guerler
date Thu, 05 Jun 2014 14:23:41 -0400
parents 5a478e171752
children
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