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

Question

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

Answer 1

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

我们首先在R.创建track类然后，我们通过提供一个串给构造创建一个最小的函数创建一个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 ++ 。