From 430078bb3f99af005818141886c1738f3b1f00ba Mon Sep 17 00:00:00 2001
From: E114424Z <dimitri.meistermann@etu.univ-nantes.fr>
Date: Thu, 7 Feb 2019 15:41:34 +0100
Subject: [PATCH] fix bug in module report generation
---
WGCNAanalysis.R | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/WGCNAanalysis.R b/WGCNAanalysis.R
index d23608d..8e1f8ec 100644
--- a/WGCNAanalysis.R
+++ b/WGCNAanalysis.R
@@ -439,8 +439,8 @@ for(mod in moduleOrder){
####Write report####
-foreach(module=moduleOrder) %dopar% {
- moduleGenes <- genesMod[which(genesMod$Module==module),"Gene"]
+foreach(module = moduleOrder) %dopar% {
+ moduleGenes <- as.character(genesMod[which(genesMod$Module==module),"Gene"])
if(module!="grey"){
pdf(paste0("circlePlot/",module,"_circlePlot.pdf"),onefile = TRUE,width=12,height=12)
bc <- cor(datExpr[,moduleGenes])
--
GitLab