Question

我正在使用Rcpp在R中创建一个利用C ++代码的包。我已经阅读了所有的Rcpp小插曲，但我还没能找到解决以下问题的方法。

我尝试使用的C++个类之一包含一个指针。我正在使用模块公开课程。当我尝试在R中安装软件包时，出现以下错误。

error: expected unqualified-id before '*' token.field("*w", &ffm_model::*w)

我做错了什么？

包含指针的类的代码

typedef float ffm_float;
typedef int ffm_int;

class ffm_model {
  public:
    ffm_int n; // number of features
    ffm_int m; // number of fields
    ffm_int k; // number of latent factors
    ffm_float *w = nullptr;
    bool normalization;
    ~ffm_model();
};

相应RCPP模块的代码

RCPP_MODULE(ffmModelMod){
  using namespace Rcpp;

  //Expose class as ffm_model on the r side
  class_<ffm_model>( "ffm_model")

    .field("n", &ffm_model::n)
    .field("m", &ffm_model::m)
    .field("k", &ffm_model::k)
    .field("*w", &ffm_model::*w)
    .field("normalization", &ffm_model::normalization)
    .method("~ffm_model",&ffm_model::~ffm_model)
    ;
}

Answer 1

我遇到了类似的问题，正如Dirk所提到的，这是由于无法自动映射的类型引起的，例如float*。

以下变通办法适用于我：

请勿将类型有问题的字段暴露给R。
相反，将get()和set()函数公开到上面的字段。

这里是一个示例，其中（无问题的）value字段和（有问题的）child字段（指向相同类的对象的指针）都被隐藏了：

课程

#include <Rcpp.h>
using namespace Rcpp;

class node
{
public:
    double value; // Voluntarily hidden from R
    node* child; // Must be hidden from R

    // Exposed functions
    void setVal(double value);
    double getVal();

    node* createNode(double value); // return pointer to a node
    node* createChild(double value); // set child
    node* getChild();

};

方法

void node::setVal(double value){
    this->value = value;
}
double node::getVal(){
    return this->value;
} 
node* node::createNode(double value){
    node* n = new node;
    n->value = value;
    return n;
}
node* node::createChild(double value){
    this->child = createNode(value);
    return child;
}
node* node::getChild(){
    return this->child;
}

RCPP模块

RCPP_MODULE(gbtree_module){
    using namespace Rcpp;
    class_<node>("node")
        .constructor()
      .method("setVal", &node::setVal)
      .method("getVal", &node::getVal)
      .method("createNode", &node::createNode)
      .method("createChild", &node::createChild)
      .method("getChild", &node::getChild)
    ;
}

R中的用法

n <- new(node)
n$setVal(2)
n$getVal()
n2 <- n$createNode(1) # unrelated node
n3 <- n$createChild(3) #child node
n$getChild() #pointer to child node
n3

Rcpp - 公开包含指向R的指针的C ++函数

1 个答案: