在R6类中使用rcpp函数

Question

开发程序包时，是否可以在R6类中使用Rcpp函数？ 示例：我的包的/ src文件夹中有一个add.cpp，如下所示

#include <Rcpp.h>
using namespace Rcpp;

//
//' Add two numbers 
//'
//' @param x An integer.
//' @param y An integer
// [[Rcpp::export]]
int add(int x, int y) {
  return x + y;
}

我希望将Rcpp add函数用作名为Numbers的R6类中的公共函数，该类位于包的/ R文件夹中的Numbers.R文件中

Numbers <- R6class(
"Number",
private = list(
a =6,
b=10
),
public = list(
# How to use add function from add.cpp file using private$a and private$b as inputs 
) 
)

Answer 1

您可以简单地调用该函数。 我想念什么吗？

Numbers <- R6::R6Class(
  "Number",
  private = list(
    a = 6,
    b = 10
  ),
  public = list(
    add_ab = function() {
      add(private$a, private$b)
    }
  ) 
)
# Example
num <- Numbers$new()
num$add_ab()