# #设置,回声= FALSE --------------------------------------------------- 库(LearnBioconductor) stopifnot (BiocInstaller:: biocVersion() = = 3.1” ") ## ---- 风格,回声= FALSE,结果= '飞机 '------------------------------- BiocStyle:减价 () ## ---- ggplot-setup eval = FALSE -------------------------------------------- # 库(DESeq2) #库(气管)#数据(气管)# se =气道# dds < - DESeqDataSet细胞(se设计= ~ +敏捷)# dds敏捷< relevel (dds敏捷美元,美元“untrt”)# dds < - DESeq (dds) # res (dds) # resdf < < -结果- as.data.frame (res) # #——火山,eval = FALSE ------------------------------------------------- # 情节(log10 (padj) ~ log2FoldChange resdf)