....

[iramuteq] / Rscripts / afc_graph.R

diff --git a/Rscripts/afc_graph.R b/Rscripts/afc_graph.R
index e4b0617..f450f1e 100644 (file)
--- a/Rscripts/afc_graph.R
+++ b/Rscripts/afc_graph.R
@@ -1,5 +1,5 @@
 #Author: Pierre Ratinaud
-#Copyright (c) 20010 Pierre Ratinaud
+#Copyright (c) 20010-2013 Pierre Ratinaud
 #Lisense: GNU/GPL
 
 
@@ -184,7 +184,6 @@ if (typegraph == 0) {
 } else {
     library(rgl)
     rn <- vire.nonascii(rownames(table.in))
-    print(rn)
     rain = rainbow(clnb)
     colors = rain[classes]
     #rn <- rownames(table.in)