From 56092341abe9579b995ff6105722154183b31d22 Mon Sep 17 00:00:00 2001
From: Alexander Kabui
Date: Tue, 14 Sep 2021 23:41:46 +0300
Subject: remove debug statements

---
 scripts/wgcna_analysis.R | 9 +--------
 1 file changed, 1 insertion(+), 8 deletions(-)

(limited to 'scripts')

diff --git a/scripts/wgcna_analysis.R b/scripts/wgcna_analysis.R
index efe0336..16a44fd 100644
--- a/scripts/wgcna_analysis.R
+++ b/scripts/wgcna_analysis.R
@@ -56,14 +56,6 @@ network <- blockwiseModules(dataExpr,
                   PamRespectsDendro = FALSE
                 )
 
-# plot dendro add color
-
-# Convert labels to colors for plotting
-mergedColors = labels2colors(net$colors)
-# Plot the dendrogram and the module colors underneath 
-
-
-# generate random name for png && save the image location
 
 
 genImageRandStr <- function(prefix){
@@ -74,6 +66,7 @@ genImageRandStr <- function(prefix){
 }
 
 
+mergedColors = labels2colors(net$colors)
 
 png(genImageRandStr,width=1000,height=600,type='cairo-png')
 
-- 
cgit v1.2.3