安裝R包
鏡像設(shè)置
options(BioC_mirror="https://mirrors.ustc.edu.cn/bioc/")
安裝
install.packages(“包”) 或者BiocManager::install(“包”)
加載
library(包)或者require(包)
dplyr的五個(gè)基礎(chǔ)函數(shù)
先導(dǎo)入示例數(shù)據(jù)集
test <- iris[c(1:2,51:52,101:102),]
新增列 mutate()
mutate(test, new = Sepal.Length * Sepal.Width)
按列篩選 select()
select(數(shù)據(jù)框,1) 篩選第一列
select(數(shù)據(jù)框,c(1,5)) 篩選第一和第五列
select(數(shù)據(jù)框,列名) 按照列名篩選
篩選多個(gè)列時(shí)
vars <- c("Petal.Length", "Petal.Width")
select(test, one_of(vars))
按行篩選 filter()
filter(test, Species == "setosa")
filter(test, Species == "setosa"&Sepal.Length > 5 )
filter(test, Species %in% c("setosa","versicolor"))
排序 arrange()
按照指定列排序,默認(rèn)從小到大
arrange(test, Sepal.Length)
用desc從大到小排序
arrange(test, desc(Sepal.Length))
匯總 summarise()
計(jì)算Sepal.Length的平均值和標(biāo)準(zhǔn)差
summarise(test, mean(Sepal.Length), sd(Sepal.Length))
結(jié)合group_by()分組運(yùn)算,先按照Species分組,計(jì)算每組Sepal.Length的平均值和標(biāo)準(zhǔn)差
summarise(group_by(test, Species),mean(Sepal.Length), sd(Sepal.Length))
管道操作 %>% (cmd/ctr + shift + M)
符號(hào)%>%,這是管道操作,其意思是將%>%左邊的對(duì)象傳遞給右邊的函數(shù),作為第一個(gè)選項(xiàng)的設(shè)置
test %>% group_by(Species) %>% summarise(mean(Sepal.Length), sd(Sepal.Length))
統(tǒng)計(jì)某列unique值 count()
count(test,Species)
處理關(guān)系數(shù)據(jù)
將2個(gè)表進(jìn)行連接,注意:不要引入factor
(options(stringsAsFactors = F))
inner_join(test1, test2, by = "x") 內(nèi)連,以指定列為準(zhǔn)取交集
left_join(test1, test2, by = 'x') 左連,以指定列為準(zhǔn),將test2的數(shù)據(jù)補(bǔ)充到test1
full_join( test1, test2, by = 'x') 全連,以指定列為準(zhǔn)取并集
semi_join(x = test1, y = test2, by = 'x') 半連接,返回能夠與y表匹配的x表所有記錄
anti_join(x = test2, y = test1, by = 'x') 反連接,返回?zé)o法與y表匹配的x表的所記錄
bind_rows(test1, test2) 合并,需要兩個(gè)表格列數(shù)相同
bind_cols(test1, test3) 合并,需要兩個(gè)表格行數(shù)相同