Question

我希望这不是太明显，因为我整天搜索都找不到答案。

说我有以下R文件：

library(Rcpp)
sourceCpp("cfile.cpp")

giveOutput(c(1,2,3))

它编译以下C ++文件：

#include <Rcpp>
using namespace Rcpp;
// [[Rcpp::export]]

NumericVector plusTwo(NumericVector x){
  NumericVector out = x + 2.0;

  return out;
}

NumericVector giveOutput(NumericVector a){

NumericVector b = plusTwo(a);
return b;
}

无论我尝试什么，Rcpp预处理器都可以使plusTwo()可用，而giveOutput()则不可用。我能够找到的文档说，这是一个人应该创建一个包的点，但在阅读了包后，它看起来比我需要的要复杂一个数量级。

如果没有在plusTwo()内明确定义giveOutput()，我该怎么办？

Answer 1

您需要在要导出的每个功能前面使用导出属性。因此，将文件更正为

#include <Rcpp.h>

using namespace Rcpp;

// [[Rcpp::export]]
NumericVector plusTwo(NumericVector x){
  NumericVector out = x + 2.0;
  return out;
}

// [[Rcpp::export]]
NumericVector giveOutput(NumericVector a){
  NumericVector b = plusTwo(a);
  return b;
}

我得到了理想的行为：

R> sourceCpp("/tmp/patrick.cpp")
R> giveOutput(1:3)
[1] 3 4 5
R> plusTwo(1:3)
[1] 3 4 5
R>

哦，创建包就像调用Rcpp.package.skeleton()一样简单（但请阅读其帮助页面，特别是attributes参数）。我知道至少有一个CRAN软件包开始了你从这里开始的方式，明确通过Rcpp.package.skeleton() ...

Rcpp - 在sourceCpp引用的文件中使用多个C ++函数？

1 个答案: