r - 通过环境 Rcpp 从 C++ 调用函数

Question

我正在考虑通过环境从 C++ 调用 R 函数，但出现错误，这是我所做的

#include <Rcpp.h>
using namespace Rcpp;



// [[Rcpp::export]]
NumericVector call(NumericVector x){
  Environment env = Environment::global_env();
  Function f = env["fivenum"];
  NumericVector res = f(x);
  return res;
}

类型 call(x) ，这就是我得到的

Error: cannot convert to function

我知道我可以用另一种方式做对，

#include <Rcpp.h>

using namespace Rcpp;

// [[Rcpp::export]]
NumericVector callFunction(NumericVector x, Function f) {
    NumericVector res = f(x);
    return res;
}

并输入

callFunction(x,fivenum)

但仍然想知道为什么第一种方法失败了。

Answer 1

fivenum 函数不是在全局环境中定义的，而是在 stats 中定义的。包环境，所以你应该从中得到它:

...
Environment stats("package:stats"); 
Function f = stats["fivenum"];
...