Update R/clustering_tfit_window.R

R/clustering_tfit_window.R

@@ -31,6 +31,8 @@ clustering_tfit <- function(organism, network) {
   # Appel de la fonction tfit: TODO = save results somewhere
   result_tfit = tfit(File.gr) ##################################################
 
+  cat(result_tfit)
+
   
   
   cat("OK\n\n>Clustering TFit is done.\n")