Question

如何从Rcpp函数打印整数向量？在我的功能中，我想打印IntegerVector a。在R中，我使用例如compnz_next(5,3,c(1,2,2))

来调用此函数

#include <Rcpp.h>

using namespace Rcpp;

// [[Rcpp::export]]
IntegerVector compnz_next(int n, int k, IntegerVector a) {
  bool more = true;
  int i;
  static int h = 0;
  static int t = 0;

  for ( i = 0; i < k; i++ ) {
    a[i] = a[i] - 1;
  }
  if ( 1 < t ) {
    h = 0;
  }

  h = h + 1;
  t = a[h-1];
  a[h-1] = 0;
  a[0] = t - 1;
  a[h] = a[h] + 1;

  more = ( a[k-1] != ( n - k ) );
  Rcout << "a vector is:" << more << std::endl;
  for ( i = 0; i < k; i++ ) {
    a[i] = a[i] + 1;
  }

  return a;
}

Answer 1

请尝试以下行：

Rf_PrintValue(a);

Answer 2

为了完整性，过了一会儿，我们现在还有两个选择：

print()

这只是将R> cppFunction('void printVector2(IntegerVector v) { + Rcpp::Rcout << v << std::endl; } ') R> printVector2(c(1L, 3L, 5L)) 1 3 5 R>函数从R包装到更容易键入的operator()<<函数中。

<<

（较新的）函数是通过适当的{{1}}实现的，因此我们可以像使用其他C ++类型一样使用{{1}}。它也适用于数字向量和矩阵。

从Rcpp函数打印整数向量

2 个答案: