c++ - 'builtin' 中的未实现类型 'coerceToReal' [Rcpp]

Question

我刚刚开始使用 Rcpp。我有一个简单的程序，它接受两个数值 vector ，计算它们的并集并返回一个数值 vector 。该 list 粘贴在下方 (test.cpp)。

#include <Rcpp.h>
#include <algorithm>
using namespace Rcpp;

// [[Rcpp::export]]
NumericVector test(NumericVector x, NumericVector y) {
  int n = x.size() + y.size();
  std::vector<int> v(n);
  std::vector<int>::iterator it;

  std::sort(x.begin(), x.end());
  std::sort(y.begin(), y.end());

  it=std::set_union(x.begin(), x.end(), y.begin(), y.end(), v.begin());
  v.resize(it-v.begin());

  return wrap(v);
}


/*** R
x <- c(5,10,15,20,25)
y <- c(50,40,30,20,10)
test(x, y)
*/

当我尝试使用值运行程序时

x <- sample(20000)
y <- sample(20000)
test(x, y)

功能有效。但是当我增加值的数量时

x <- sample(1000000)
y <- sample(1000000)
test(x, y)

程序因输出而崩溃

Error in .Primitive(".Call")(<pointer: 0x7f1819d8af20>, x, y) : 
  unimplemented type 'builtin' in 'coerceToReal'

知道发生了什么事吗？感谢您的任何指示或引用。

Answer 1

替换你的 NumericVector由 IntegerVector秒。或者使用 std::vector<double> .