Mercurial > repos > guerler > charts

changeset 51:bfd966f30073 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 13:37:22 -0400
parents 12eb81b00cd9
children e10dbc437d8f
files histogramdiscrete.r
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/histogramdiscrete.r	Thu Jun 05 13:36:23 2014 -0400
+++ b/histogramdiscrete.r	Thu Jun 05 13:37:22 2014 -0400
@@ -11,8 +11,8 @@
         column <- as.numeric(columns[key])
         
         # ensure string column
-        column_data <- sapply( table[column], as.character )
-        
+        column_data <- as.character(table[column][[1]])
+    
         # collect vectors in list
         m <- append(m, list(column_data))
     }