1. 为什么要批量安装R语言包
当你在新的环境下， 安装R语言时，你需要安装很多包，比如tidyverse，比如data.table，这里你可以写一个函数，将所有需要的包写进去，然后进行批量安装
2. 程序如下：
ipak <- function(pkg){new.pkg <- pkg[!(pkg %in% installed.packages()[, "Package"])]if (length(new.pkg)) install.packages(new.pkg, dependencies = TRUE)sapply(pkg, require, character.only = TRUE)
}3. 编程思维
- 将当前已经安装的包读取
- 判断你的包是否已经安装
- 如果没有安装, 那就安装
- 返回安装状态, 是否安装成功
4. 示例代码
比如, 这里我要安装如下包, 将其写为对象packages, 然后定义函数ipak批量安装包函数, 最后使用ipk批量安装packages
packages=c("tidyverse","data.table","devtools","shiny","shinydashboard",
"sommer","agridat","agricolae","desplot")
ipak <- function(pkg){new.pkg <- pkg[!(pkg %in% installed.packages()[, "Package"])]if (length(new.pkg)) install.packages(new.pkg, dependencies = TRUE)sapply(pkg, require, character.only = TRUE)
}
ipak(packages)5. 如何运行代码
- 将上面代码放到R语言中,运行即可安装定义的包
- 如果想要增加新的包, 放到packages里面即可.
