相关疑难解决方法(0)

我有一个带有一堆用户定义的R函数的R代码.我试图让代码运行得更快,当然最好的选择是使用Rcpp.我的代码涉及相互调用的函数.因此,如果我用C++编写一些函数,我应该能够在我的c ++代码中调用并运行一些R函数.在一个简单的例子中,考虑R中的以下代码:

mySum <- function(x, y){
 return(2*x + 3*y)
}
x <<- 1
y <<- 1

现在考虑我正在尝试访问上述函数的C++代码:

#include <Rcpp.h>
using namespace Rcpp;

// [[Rcpp::export]]
int mySuminC(){
 Environment myEnv = Environment::global_env();
 Function mySum = myEnv["mySum"];
 int x = myEnv["x"];
 int y = myEnv["y"];
 return wrap(mySum(Rcpp::Named("x", x), Rcpp::Named("y", y)));
 }

当我使用内联函数sourceCpp()在R中源文件时,我收到错误:

 "invalid conversion from 'SEXPREC*' to int

任何人都可以帮我调试代码吗？我的代码有效吗？可以归纳一下吗？使用mySum函数比我在代码中做的更好吗？

非常感谢您的帮助.