使用来自R

时间:2019-02-18 22:00:24

标签: r rcpp rinside

我正在尝试将参数传递给包含exe且使用RInside编译的make文件。

以受here.启发的这段代码

#include <RInside.h>

int main(int argc, char *argv[]) {
    // define two vectors in C++
    std::vector<double> x({1.23, 2.34, 3.45});
    std::vector<double> y({2.34, 3.45, 1.23});
    // start R
    RInside R(argc, argv);
    // define a function in R
    R.parseEvalQ("rtest <- function(x, y) {x + y}");
    // transfer the vectors to R
    R["x"] = x;
    R["y"] = y;
    // call the function in R and return the result
    std::vector<double> z = R.parseEval("rtest(x, y)");
    std::cout << z[0] << std::endl;

    // move R function to C++
    Rcpp::Function rtest((SEXP) R.parseEval("rtest"));
    // call the R function from C++
    z = Rcpp::as<std::vector<double>>(rtest(x, y));
    std::cout << z[0] << std::endl;
    exit(0);
}

我有两个问题:

首先,尝试make -f Makefile.win soraw给出以下错误。为什么它不起作用?

soraw.cpp:21:36: error: '>>' should be '> >' within a nested template argument list
     z = Rcpp::as<std::vector<double>>(rtest(x, y));
                                    ^

第二,从R传递xy到此c ++代码(编译成exe之后)而不是在c ++代码中声明它们的最佳方法是什么?我应该使用文件吗?


编辑,这是尝试使用其他空格进行编译时的错误:candidate expects 0 arguments, 1 provided

z = Rcpp::as<std::vector<double> >(rtest(x, y));

给予

C:/Rtools/mingw_64/x86_64-w64-mingw32/include/c++/bits/stl_vector.h:264:7: note:   no known conversion for argument 1 from '<brace-enclosed initializer list>' to 'const allocator_type& {aka const std::allocator<double>&}'
C:/Rtools/mingw_64/x86_64-w64-mingw32/include/c++/bits/stl_vector.h:253:7: note: std::vector<_Tp, _Alloc>::vector() [with _Tp = double; _Alloc = std::allocator<double>]
       vector()
       ^
C:/Rtools/mingw_64/x86_64-w64-mingw32/include/c++/bits/stl_vector.h:253:7: note:   candidate expects 0 arguments, 1 provided
make: *** [<builtin>: soorig] Error 1

编辑:这是在Makefile.win

中修改这些行后出现的错误

1 个答案:

答案 0 :(得分:1)

编译问题似乎是Dirk和我的g++默认为C ++ 11,而Rtools的默认不是。您可以通过更改CXX随附的CXXFLAGS中定义GNUmakefileRInside的方式来解决此问题:

CXX :=      $(shell $(R_HOME)/bin/R CMD config CXX11) $(shell $(R_HOME)/bin/R CMD config CXX11STD)
CPPFLAGS := -Wall $(shell $(R_HOME)/bin/R CMD config CPPFLAGS)
CXXFLAGS := $(RCPPFLAGS) $(RCPPINCL) $(RINSIDEINCL) $(shell $(R_HOME)/bin/R CMD config CXX11FLAGS)

或者,您可以从C ++ 11中删除所有功能。

关于如何提供输入数据:这实际上取决于您是否要提供可能的长向量。对于前一种情况,我将使用文件。