在 R 中执行C++代码

Execute C++ code in R

本文关键字:C++ 代码 执行      更新时间:2023-10-16

我正在尝试使用 R 中的提升库执行 c++ 函数。我还安装了 boost 头文件包 (BH(。当我尝试执行代码时,它给我以下错误:

src <- '
#include <Rcpp.h>
#include <boost/math/special_functions/binomial.hpp> 
for (unsigned long i = 0; i < 5; ++i) {     
boost::math::binomial_coefficient<double>(25, i);
}'
sillyExp <- cfunction(signature(), src, convention = ".C") 

我哪里出错了?

编辑:以下是错误

Error in compileCode(f, code, language, verbose) : 
  Compilation ERROR, function(s)/method(s) not created! file68b0697546bd.cpp:11:54: fatal error: boost/math/special_functions/binomial.hpp: No such file or directory
 #include <boost/math/special_functions/binomial.hpp> 
                                                      ^
compilation terminated.
make: *** [C:/PROGRA~1/R/R-34~1.3/etc/x64/Makeconf:215: file68b0697546bd.o] Error 1
Warning message:
running command 'make -f "C:/PROGRA~1/R/R-34~1.3/etc/x64/Makeconf" -f "C:/PROGRA~1/R/R-34~1.3/share/make/winshlib.mk" SHLIB_LDFLAGS='$(SHLIB_CXXLDFLAGS)' SHLIB_LD='$(SHLIB_CXXLD)' SHLIB="file68b0697546bd.dll" WIN=64 TCLBIN=64 OBJECTS="file68b0697546bd.o"' had status 2 

如果你真的想执行一些C++代码,那么你可以使用Rcpp::evalCpp

Rcpp::evalCpp("boost::math::binomial_coefficient<double>(25, 3)", 
depends="BH", 
include="#include <boost/math/special_functions/binomial.hpp>")
#> [1] 2300