I created a list of list in Rcpp (replicated 3 times)
cppFunction(\'List myfunction(){ List L = rep(List::create(List::create(Named("elmement_1")=1,