我收到Boost和Rcpp的致命错误

Question

如文章所述：

RCPP和Boost：它应该工作，但不起作用

我试图在Windows中的Rcpp中使用boost。 （简体）文件为：

// [[Rcpp::depends(BH)]]
#include <Rcpp.h>
#include <boost/multiprecision/float128.hpp>

namespace mp = boost::multiprecision;

// [[Rcpp::export]]
std::string qexp(double da = -1500.0, double db = -1501.0)
{
  mp::float128 a(da), b(db);
  mp::float128 res = mp::exp(a) / (mp::exp(a) + mp::exp(b));
  return res.convert_to<std::string>();
}

我有一个编译问题。 正如@duckmayr在该帖子中建议的那样，我尝试使用：

Sys.setenv("PKG_LIBS" = "-lquadmath")

然后Rcpp::sourceCpp('quadexp.cpp')

这样，编译运行不会出错。 但是，当我执行qexp（）时，在RStudio中收到一条有关“致命错误”的消息，RStudio完全关闭。 你知道会发生什么吗？ 我认为我的问题是由于我具有某种配置，因为@duckmayr可以毫无问题地运行相同的代码。 为了避免出现这种令人讨厌的“致命错误”，应注意配置的哪些部分？

Answer 1

除了上面的评论：

edd@rob:~/git/so-r/52933795$ cat code.cpp
// [[Rcpp::depends(BH)]]
#include <Rcpp.h>
#include <boost/multiprecision/float128.hpp>

namespace mp = boost::multiprecision;

// [[Rcpp::export]]
std::string qexp(double da = -1500.0, double db = -1501.0) {
    mp::float128 a(da), b(db);
    mp::float128 res = mp::exp(a) / (mp::exp(a) + mp::exp(b));
    return res.convert_to<std::string>();
}


/*** R
qexp()
*/
edd@rob:~/git/so-r/52933795$ Rscript -e 'Rcpp::sourceCpp("code.cpp")'

R> qexp()
[1] "0.731058578630004879251159241821836351"
edd@rob:~/git/so-r/52933795$

即完全使用您的代码（加上添加的R调用），它只能“按原样”工作。