Skip to content

Instantly share code, notes, and snippets.

@linglingtingfei
linglingtingfei / wgcna.R
Created September 12, 2018 14:21 — forked from n-long/wgcna.R
Gene co-expression network analysis in R (WGCNA package)
library(WGCNA)
library(DESeq2)
library(cluster)
options(stringsAsFactors = FALSE);
setwd(dir = '/home/nlong/Public/clc')
x=read.csv("ccllcc", sep='\t', header=T)
datExpr = as.data.frame(x[, -c(1)]);
#names(datExpr) = names(x)[, -c(1)]
rownames(datExpr) = x$gene
datExpr=t(datExpr)