r - 可移植地使用 dyn.load 在 R 包中调用 C 函数

Question

我正在创建一个我打算提交给 CRAN 的 R 包，该包有一个调用用 C 编写的例程的函数。如何以独立于平台的方式在 R 函数中加载已编译的 C 例程？我可以通过以下方式使我的软件包在基于英特尔的 Mac 上运行:

function(mydata)
{
dyn.load(file.path(.Library,"mypkg/libs/i386",paste("mypkg", .Platform$dynlib.ext, sep=""))) 
try(
    output <- .C("myfunc_cversion",
                 in_data    = as.double(mydata),
                 res_data   = as.double(res),
                 PACKAGE    = "mypkg")
    )
    result <- as.matrix(output$res_data)
    return(result)
}

问题是对 dyn.load 的调用，我无法弄清楚如何以可移植的方式为我安装的包指定共享库的完整路径。

除了我应该使用的 .Library 之外，R 中是否还有另一个变量，或者在这种情况下是否有比 dyn.load 更好的函数？

Answer 1

您需要查看 library.dynam() 的手册页.它应该允许你做你想做的事，例如。

function(mydata)
{
library.dynam("mysharedobject",package=c("mypkg")) 
try(
        output <- .C("myfunc_cversion",
                     in_data    = as.double(mydata),
                     res_data   = as.double(res),
                     PACKAGE    = "mypkg")
        )
        result <- as.matrix(output$res_data)
        return(result)
}

哪里 mysharedobject是末尾没有 .dll/.so 等的共享对象文件的名称。

手册页还建议您只在 .onLoad() 中使用它。或 .First.lib()职能。

HTH

http://sekhon.berkeley.edu/base/html/library.dynam.html