## ----设置，回声=假--------------------------------------------图书馆（SearchBiocionders）Stopifnot（Biocinstaller :: biocversion（）==“3.0”）## ----样式，回声=假，结果='ASIS'----------------------------------生物陶器:: Markdown（）## ---- GGPLOT-SETUP，eval = false ---------------------------------------＃图书馆（DESEQ2）＃图书馆（航空公司）＃数据（呼吸道）#se = sirway＃dds < - deseqdataset（se，design =〜cell + dex）#dds $ dex <-fortel（dds $ dex，“untrt”）＃dds < - deseq（dds）＃res < - 结果（DDS）#resdf < - as.data.frame（res）## ----火山，eval = false ----------------------------------------------- #--＃图（-log10（padj）〜log2foldchange，resdf）