From d1be5270b99959f99802a7704562eeaaeb504122 Mon Sep 17 00:00:00 2001
From: Alexander Kabui
Date: Wed, 13 Oct 2021 07:29:24 +0300
Subject: minor fixes for sript enable annotations

---
 scripts/wgcna_analysis.R | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/scripts/wgcna_analysis.R b/scripts/wgcna_analysis.R
index a5cbbe3..b0d25a9 100644
--- a/scripts/wgcna_analysis.R
+++ b/scripts/wgcna_analysis.R
@@ -13,8 +13,6 @@ cat("Running the wgcna analysis script\n")
 # pass the file path to read json data
 
 
-
-
 args = commandArgs(trailingOnly=TRUE)
 
 if (length(args)==0) {
@@ -100,6 +98,7 @@ genImageRandStr <- function(prefix){
 	return(paste(randStr,".png",sep=""))
 }
 
+
 mergedColors <- labels2colors(network$colors)
 
 imageLoc <- file.path(imgDir,genImageRandStr("WGCNAoutput"))
@@ -111,7 +110,7 @@ cat("Generating the CLuster  dendrogram\n")
 
 plotDendroAndColors(network$dendrograms[[1]],mergedColors[network$blockGenes[[1]]],
 "Module colors",
-dendroLabels = FALSE, hang = 0.03,
+dendroLabels = NULL, hang = 0.03,
 addGuide = TRUE, guideHang = 0.05)
 
 
-- 
cgit v1.2.3