From 94e2e79141cbddb48456fb5707eb0e4e36e97d3b Mon Sep 17 00:00:00 2001
From: Alexander Kabui
Date: Wed, 15 Sep 2021 02:19:03 +0300
Subject: rename variables && delete debugs

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

diff --git a/scripts/wgcna_analysis.R b/scripts/wgcna_analysis.R
index 54650df..390bee4 100644
--- a/scripts/wgcna_analysis.R
+++ b/scripts/wgcna_analysis.R
@@ -1,7 +1,3 @@
-# initial workspace setup
-
-
-# todo pass required input data here
 library(WGCNA);
 library(stringi);
 
@@ -11,15 +7,14 @@ imgDir = Sys.getenv("GENERATED_IMAGE_DIR")
 
 # load expression data **assumes csv format row(traits)(columns info+samples)
 
-wgcnaRawData <- read.csv(file = "wgcna_data.csv")
+inputData <- read.csv(file = "wgcna_data.csv")
 
 # transform expressionData
 
-dataExpr <- as.data.frame(t(wgcnaRawData));
+dataExpr <- as.data.frame(t(inputData));
 
 # data cleaning
 
-# adopted from docs
 gsg = goodSamplesGenes(dataExpr, verbose = 3);
 
 
-- 
cgit v1.2.3