在R中执行C ++代码

时间:2018-07-04 13:16:59

标签: c++ r

我正在尝试使用R中的boost库执行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 

1 个答案:

答案 0 :(得分:1)

如果您确实要执行一些C ++代码,则可以使用Rcpp::evalCpp

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