r - 在 Rcpp 中创建 R S4 类的对象？

Question

有一个 S4 R 类，我需要在 Rcpp 中创建它的对象。是否有可能做到这一点，如果是，如何？

Answer 1

当然。这是从 Rcpp 包中的 S4 单元测试中获取的内容。

我们先创建一个track R 中的类。然后我们创建一个最小函数，创建一个 S4对象通过向构造函数提供一个字符串并返回它:

R> setClass("track", representation(x="numeric", y="numeric"))
R> cppFunction('SEXP trythis(std::string txt) { S4 foo(txt); return foo; }')
R> trythis("track")
An object of class "track"
Slot "x":
numeric(0)

Slot "y":
numeric(0)

R> 

您可以从 C++ 设置槽值等 pp。