学习小组Day6笔记——思

作者: cecilia_7f32 | 来源:发表于2020-12-31 09:48 被阅读0次

    安装R包

    镜像设置

    options(BioC_mirror="https://mirrors.ustc.edu.cn/bioc/") 
    

    安装

    install.packages(“包”) 或者BiocManager::install(“包”)

    加载

    library(包) 或者require(包)

    dplyr的五个基础函数

    先导入示例数据集

    test <- iris[c(1:2,51:52,101:102),]
    

    新增列 mutate()

    mutate(test, new = Sepal.Length * Sepal.Width)
    

    按列筛选 select()

    select(数据框,1) 筛选第一列
    select(数据框,c(1,5)) 筛选第一和第五列
    select(数据框,列名) 按照列名筛选

    筛选多个列时

    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()

    按照指定列排序,默认从小到大

    arrange(test, Sepal.Length)
    

    用desc从大到小排序

    arrange(test, desc(Sepal.Length))
    

    汇总 summarise()

    计算Sepal.Length的平均值和标准差

    summarise(test, mean(Sepal.Length), sd(Sepal.Length))
    

    结合group_by()分组运算,先按照Species分组,计算每组Sepal.Length的平均值和标准差

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

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

    符号%>%,这是管道操作,其意思是将%>%左边的对象传递给右边的函数,作为第一个选项的设置

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

    统计某列unique值 count()

    count(test,Species)

    处理关系数据

    将2个表进行连接,注意:不要引入factor
    (options(stringsAsFactors = F))

    • inner_join(test1, test2, by = "x") 内连,以指定列为准取交集
    • left_join(test1, test2, by = 'x') 左连,以指定列为准,将test2的数据补充到test1
    • full_join( test1, test2, by = 'x') 全连,以指定列为准取并集
    • semi_join(x = test1, y = test2, by = 'x') 半连接,返回能够与y表匹配的x表所有记录
    • anti_join(x = test2, y = test1, by = 'x') 反连接,返回无法与y表匹配的x表的所记录
    • bind_rows(test1, test2) 合并,需要两个表格列数相同
    • bind_cols(test1, test3) 合并,需要两个表格行数相同

    相关文章

      网友评论

        本文标题:学习小组Day6笔记——思

        本文链接:https://www.haomeiwen.com/subject/lpkloktx.html