From: Pierre <ratinaud@univ-tlse2.fr>
Date: Tue, 11 Feb 2014 13:09:39 +0000 (+0100)
Subject: few changes
X-Git-Url: http://iramuteq.org/git?p=iramuteq;a=commitdiff_plain;h=b88ae24b0e45f690eca1ffd04c7336c6641982ec

few changes
---

diff --git a/Rscripts/simi.R b/Rscripts/simi.R
index e259cbc..2564e2e 100644
--- a/Rscripts/simi.R
+++ b/Rscripts/simi.R
@@ -334,6 +334,9 @@ plot.simi <- function(graph.simi, p.type = 'tkplot',filename=NULL, communities =
         rgl.close()
 	#	while (rgl.cur() != 0)
 	#		Sys.sleep(0.5)
+	} else if (p.type == 'web') {
+		library(rgexf)
+		simi.to.gexf(filename, graph.simi, nodes.attr = NULL)
 	}
 }