当你在新的环境下, 安装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)
将上面代码放到R语言中,运行即可安装定义的包
如果想要增加新的包, 放到packages里面即可.
字数少于300, 不能申请原创,那我就打一些字,然后就可以申请原创了,因为申请原创很重要啊,所以我才打这么多字。感觉可以了,那就开始申请原创吧。
联系客服