From b88ae24b0e45f690eca1ffd04c7336c6641982ec Mon Sep 17 00:00:00 2001
From: Pierre <ratinaud@univ-tlse2.fr>
Date: Tue, 11 Feb 2014 14:09:39 +0100
Subject: [PATCH] few changes

---
 Rscripts/simi.R | 3 +++
 1 file changed, 3 insertions(+)

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)
 	}
 }
 
-- 
2.7.4