循环和如果语句检查和加载软件包

Question

为什么不需要包装载​​体？还可以将PKG拆分用于install.package和Biocmanager吗？因此，如果软件包无法与install.package安装，请与Biocmanager核对？

错误： [1]“ stringr” 加载所需的软件包：我 print.default中的错误（“尝试安装”，i）： 无效的打印数字-2147483648 另外：警告消息： 1：在库中（package，lib.loc = lib.loc，tarne.only = true，logical.return = true，： 没有包装称为“我” 2：在print.default中（“尝试安装”，i）：强制引入的NAS

pkg <- c("stringr", "openxlsx")

for (i in pkg){
    print(i)
    if(require(i)){
       print(i, "is loaded correctly")
    } else{
       print("trying to install", i)
       install.packages(i)
       if(require(i)){
          print(i, "installed and loaded")
       } else{
          stop("could not install", i)
       }
    }

}

Answer 1

在循环中至少是3个错误。首先，第一个的缺少参数需要

...代码> i 可以评估而不是作为软件包名称，（请参阅？quired参数部分）

...最后，未能在中连接所需的字符值打印用粘贴调用。 （请参阅？print.default的参数部分。打印功能仅打印其第一个参数。其第二个参数是数字数，如控制台错误消息所述。）

pkg <- c("stringr", "openxlsx")

for (i in pkg){
    print(i)
    if(require(i, character.only=TRUE)){
        print(paste(i, "is loaded correctly"))
    } else{
        print(paste("trying to install", i))
        install.packages(i)
        if(require(i, character.only=TRUE)){
            print(paste(i, "installed and loaded"))
        } else{
            stop(paste("could not install", i))
        }
    }
}

我确实收到了：”警告消息：
在库中（package，lib.loc = lib.loc，tarne.only = true，logical.return = true，：
我不理解该循环的第一次运行后没有称为'OpenXlsx'的软件包（因为消息[1]“ OpenXLSX已安装和加载”已打印，并且包装确实安装了软件包可以加载。信息。