conds <- factor( rep("samples", times=ncol(countsTable)) )
cds <- newCountDataSet( countsTable[setdiff(rownames(countsTable), tailrows),], conds )
cds <- estimateSizeFactors( cds )
countsNorm <- counts( cds, normalized=TRUE )
countsNorm <- round(countsNorm, digits=1)
write.table(countsNorm, file=file.path(res.path, paste(tumorname, ".normalized.count.all.features.txt", sep="")), row.names=T, col.names=NA, sep="\t", quote=F)
DESeq2 normalized
©著作权归作者所有,转载或内容合作请联系作者
【社区内容提示】社区部分内容疑似由AI辅助生成,浏览时请结合常识与多方信息审慎甄别。
平台声明:文章内容(如有图片或视频亦包括在内)由作者上传并发布,文章内容仅代表作者本人观点,简书系信息发布平台,仅提供信息存储服务。
【社区内容提示】社区部分内容疑似由AI辅助生成,浏览时请结合常识与多方信息审慎甄别。
平台声明:文章内容(如有图片或视频亦包括在内)由作者上传并发布,文章内容仅代表作者本人观点,简书系信息发布平台,仅提供信息存储服务。