From ea0e92d3f63a9f403aacd5ab1590f61f2752158a Mon Sep 17 00:00:00 2001
From: Alexander Kabui
Date: Tue, 14 Sep 2021 22:12:43 +0300
Subject: load the required data for analysis

---
 scripts/wgcna_analysis.R | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)

(limited to 'scripts')

diff --git a/scripts/wgcna_analysis.R b/scripts/wgcna_analysis.R
index e69de29..a8170b6 100644
--- a/scripts/wgcna_analysis.R
+++ b/scripts/wgcna_analysis.R
@@ -0,0 +1,21 @@
+# initial workspace setup
+
+library(WGCNA);
+stringsAsFactors = FALSE
+
+# load expression data **assumes csv format row(traits)(columns info+samples)
+
+
+wgcnaRawData <- read.csv(file = "wgcna_data.csv")
+
+# transform expressionData
+
+datExpr <- as.data.frame(t(wgcnaRawData));
+
+
+
+
+
+
+
+
-- 
cgit v1.2.3