Question

我刚注意到version的{{1}}或R函数没有require()个参数。当人们需要确保他们至少拥有一些包的最低版本时，他们会怎么做，以便例如他们知道一些错误是固定的，或者某些功能是否可用，或者其他什么？

我知道包作者的library()内容，但我正在寻找在脚本，交互式环境，Depends文件，代码片段等中使用的东西。

Answer 1

您可以使用packageVersion()：

packageVersion("stats")
# [1] ‘2.14.1’

if(packageVersion("stats") < "2.15.0") {
    stop("Need to wait until package:stats 2.15 is released!")
}
# Error: Need to wait until package:stats 2.15 is released!

这是有效的，因为packageVersion()会返回类package_version的对象，<的行为符合我们的要求（<在比较两个字符时不会做使用字典排序的字符串）。

Answer 2

在阅读了Paul的伪代码后，这是我写的函数。

use <- function(package, version=0, ...) {
  package <- as.character(substitute(package))
  library(package, ..., character.only=TRUE)
  pver <- packageVersion(package)
  if (compareVersion(as.character(pver), as.character(version)) < 0)
    stop("Version ", version, " of '", package, 
         "' required, but only ", pver, " is available")
  invisible(pver)
}

它的功能与library()基本相同，但需要额外的version参数：

> use(plyr, 1.6)
> use(ggplot2, '0.9')
Error in use(ggplot2, "0.9") : 
  Version 0.9 of 'ggplot2' required, but only 0.8.9 is available

Answer 3

我不知道这样的功能，但制作一个功能应该很容易。您可以将其基于sessionInfo()或packageVersion()。加载脚本所需的包后，您可以从那里收集包号。检查版本号的函数看起来像（在伪代码中，因为我现在没有时间）：

check_version = function(pkg_name, min_version) {
    cur_version = packageVersion(pkg_name)
    if(cur_version < min_version) stop(sprintf("Package %s needs a newer version, 
               found %s, need at least %s", pkg_name, cur_version, min_version))
}

调用它就像：

library(ggplot2)
check_version("ggplot2", "0.8-9")

您仍然需要将版本号解析为允许比较cur_version < min_version的内容，但基本结构保持不变。

需要最低版本的R包

3 个答案: