Day6-李丘山

最新推荐文章于 2025-05-23 21:21:40 发布

不爱吃豆沙包

最新推荐文章于 2025-05-23 21:21:40 发布

阅读量350

点赞数 8

文章标签：笔记

本文链接：https://blog.csdn.net/m0_71952366/article/details/136019739

版权

本文详细介绍了如何在R语言中安装、卸载和管理R包，包括使用`install.packages`、`BiocManager`和`devtools`等函数，以及查看、更新包版本、路径，以及对数据集如dyplr中的数据进行筛选、排序和汇总的操作。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

R包相关

R包安装和卸载

R包安装

install.packages("pkg_name",lib='Path_name')   
BiocManager::install("pkg_name")
devtools::install_github("用户名/pkg_name")

查看已安装R包

installed.packages()
library()
sessionInfo()       ##包括所有版本信息
.libPath()          ##所有R包的安装路径

查看R包的版本/路径

packageVersion("pkg_name")           ##版本
find.package("pkg_name")             ##安装路径

卸载R包

remove.packages("pkg_name")
detach("")

安装特定版本R包

library(devtools)
install_version("pkg_name",version="3.4.1",/repos="")

packageurl <- "http://cran.r-project.org/src/contrib/Archive/..."     #本地
install.packages(packageurl, repos=NULL, type="source")

dyplr包

mutate()新增列

mutate(test, new = Sepal.Length * Sepal.Width)          #在test中新建一列名为new，值为length*width

select()按列筛选

####################################按列号筛选
select(test,1)
##     Sepal.Length
## 1            5.1
## 2            4.9
## 51           7.0
## 52           6.4
## 101          6.3
## 102          5.8
select(test,c(1,5))
##     Sepal.Length    Species
## 1            5.1     setosa
## 2            4.9     setosa
## 51           7.0 versicolor
## 52           6.4 versicolor
## 101          6.3  virginica
## 102          5.8  virginica
######################################按列名筛选
select(test,Sepal.Length)
##     Sepal.Length
## 1            5.1
## 2            4.9
## 51           7.0
## 52           6.4
## 101          6.3
## 102          5.8
select(test, Petal.Length, Petal.Width)
##     Petal.Length Petal.Width
## 1            1.4         0.2
## 2            1.4         0.2
## 51           4.7         1.4
## 52           4.5         1.5
## 101          6.0         2.5
## 102          5.1         1.9
vars <- c("Petal.Length", "Petal.Width")
select(test, one_of(vars))
##     Petal.Length Petal.Width
## 1            1.4         0.2
## 2            1.4         0.2
## 51           4.7         1.4
## 52           4.5         1.5
## 101          6.0         2.5
## 102          5.1         1.9

filter() 筛选行

filter(test, Species == "setosa")
##   Sepal.Length Sepal.Width Petal.Length Petal.Width Species
## 1          5.1         3.5          1.4         0.2  setosa
## 2          4.9         3.0          1.4         0.2  setosa
filter(test, Species == "setosa"&Sepal.Length > 5 )
##   Sepal.Length Sepal.Width Petal.Length Petal.Width Species
## 1          5.1         3.5          1.4         0.2  setosa
filter(test, Species %in% c("setosa","versicolor"))
##   Sepal.Length Sepal.Width Petal.Length Petal.Width    Species
## 1          5.1         3.5          1.4         0.2     setosa
## 2          4.9         3.0          1.4         0.2     setosa
## 3          7.0         3.2          4.7         1.4 versicolor
## 4          6.4         3.2          4.5         1.5 versicolor

arrange()对某一列进行排序

arrange(test, Sepal.Length)                         #默认从小到大排序
##   Sepal.Length Sepal.Width Petal.Length Petal.Width    Species
## 1          4.9         3.0          1.4         0.2     setosa
## 2          5.1         3.5          1.4         0.2     setosa
## 3          5.8         2.7          5.1         1.9  virginica
## 4          6.3         3.3          6.0         2.5  virginica
## 5          6.4         3.2          4.5         1.5 versicolor
## 6          7.0         3.2          4.7         1.4 versicolor
arrange(test, desc(Sepal.Length))                  #用desc从大到小
##   Sepal.Length Sepal.Width Petal.Length Petal.Width    Species
## 1          7.0         3.2          4.7         1.4 versicolor
## 2          6.4         3.2          4.5         1.5 versicolor
## 3          6.3         3.3          6.0         2.5  virginica
## 4          5.8         2.7          5.1         1.9  virginica
## 5          5.1         3.5          1.4         0.2     setosa
## 6          4.9         3.0          1.4         0.2     setosa

summarise()汇总，可结合groupby，达到计算平均值标准差等的目的

summarise(test, mean(Sepal.Length), sd(Sepal.Length))# 计算Sepal.Length的平均值和标准差
##   mean(Sepal.Length) sd(Sepal.Length)
## 1           5.916667        0.8084965
# 先按照Species分组，计算每组Sepal.Length的平均值和标准差
group_by(test, Species)
## # A tibble: 6 x 5
## # Groups:   Species [3]
##   Sepal.Length Sepal.Width Petal.Length Petal.Width Species   
## *        <dbl>       <dbl>        <dbl>       <dbl> <fct>     
## 1          5.1         3.5          1.4         0.2 setosa    
## 2          4.9         3            1.4         0.2 setosa    
## 3          7           3.2          4.7         1.4 versicolor
## 4          6.4         3.2          4.5         1.5 versicolor
## 5          6.3         3.3          6           2.5 virginica 
## 6          5.8         2.7          5.1         1.9 virginica
summarise(group_by(test, Species),mean(Sepal.Length), sd(Sepal.Length))
## # A tibble: 3 x 3
##   Species    `mean(Sepal.Length)` `sd(Sepal.Length)`
##   
## 1 setosa                     5                 0.141
## 2 versicolor                 6.7               0.424
## 3 virginica                  6.05              0.354

%in%管道操作，快捷键：ctrl+shift+M
count统计某列的unique值

count(test,Species)
## # A tibble: 3 x 2
##   Species        n
##   
## 1 setosa         2
## 2 versicolor     2
## 3 virginica      2

引用自花花老师的教程！！再次致谢！学到了好多食用小技巧嘿嘿
周末快乐！