Rcpp中嵌套列表的绑定元素

几天前我问过这个问题，但没有给出一个可复制的示例（很抱歉），所以这里我再次询问，并提供了复制它所需的实际代码

我目前在Rcpp中有一个嵌套列表，与此处生成的列表类似：

#include <Rcpp.h>
using namespace Rcpp;

// [[Rcpp::export]]
List listGenerate() {
  List firstLayer(3);
  List secondLayer(3);
  for (int i=0; i<3; i++){
    NumericVector myVec = NumericVector::create(1,2,3);
    NumericMatrix myMat = cbind(myVec, myVec);
    firstLayer(i) = myMat;
    for (int j=0; j<3; j++){
      secondLayer(j) = firstLayer;
    }
  }
  return secondLayer;
}

#包括
使用名称空间Rcpp；
//[[Rcpp:：导出]]
列表listGenerate（）{
列出第一层（3）；
第二层列表（3）；
对于（int i=0；i
unlisted_first_layer <- unlist(listGenerate(), recursive = F)
do.call(rbind, unlisted_first_layer)