数据库代码公开:GEO数据集差异分析
作者:半步博导 时间:2024年6月30日 05:09
阅读量:164
#GEO差异分析同样采用wilcox.test函数,采用scale函数进行zscore标准化
geneName = "MKI67"
tmp = read.csv("GEO_Tumor_Normal.csv",
row.names = NULL,
check.names = F,
header = T,
stringsAsFactors = F)
tmp = tmp[,c(geneName,"Type")]
tmp[,2] = scale(as.numeric(unlist(tmp[,2])),
center = TRUE,
scale = TRUE)
tmp = na.omit(tmp)
p = wilcox.test(tmp[which(tmp$Type == "Normal"),geneName],
tmp[which(tmp$Type == "Tumor"),geneName])$p.value