当你在新的环境下, 安装R语言时,你需要安装很多包,比如tidyverse
,比如data.table
,这里你可以写一个函数,将所有需要的包写进去,然后进行批量安装
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)
}
比如, 这里我要安装如下包, 将其写为对象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)