下載、加載R包萬能代碼

rm(list = ls())
options()BioC_mirror
options(BioC_mirror="http://mirrors.tuna.tsinghua.edu.cn/bioconductor/")
options("repos" = c(CRAN="https://mirrors.tuna.tsinghua.edu.cn/CRAN/"))
options()BioC_mirror
if (!requireNamespace("BiocManager", quietly = TRUE))
install.packages("BiocManager")
BiocManager::install("DESeq2",ask = F,update = F)

dplyr五個基礎(chǔ)函數(shù)

mutate(data, new = )#新增列
select(test,列名或列的向量)#按照列名列號篩選列
filter(test, 某列名 == ？)#按列的條件篩選行
arrange(test, Sepal.Length)#默認按照Sepal.Length列大小從小到大排
arrange(test, desc(Sepal.Length))#用desc從大到小
summarise(test, mean(Sepal.Length), sd(Sepal.Length))# 計算Sepal.Length的平均值和標準差

使用技能

count統(tǒng)計某列的unique值：

count(test,Species)

管道操作 %>% (cmd/ctr + shift + M)：

test %>%
group_by(Species) %>%
summarise(mean(Sepal.Length), sd(Sepal.Length))