Hello Wush, Indeed, thank you! I will write more on this after I finish the code, since there are some bits which are a mystery to me.
Tal ----------------Contact Details:------------------------------------------------------- Contact me: tal.gal...@gmail.com | Read me: www.talgalili.com (Hebrew) | www.biostatistics.co.il (Hebrew) | www.r-statistics.com (English) ---------------------------------------------------------------------------------------------- On Tue, Aug 20, 2013 at 12:13 PM, Wush Wu <wush...@gmail.com> wrote: > Hi Tal, > > ``` > cppFunction(' > std::vector<RObject> temp2_fail(RObject x){ > std::vector<RObject> lower; > List x_list(wrap(x)); > int n = x_list.size(); > lower.push_back(x); > return(lower) ; > } > ') > ``` > > Is this what you want? > > > 2013/8/20 Tal Galili <tal.gal...@gmail.com> > >> Dear list members, >> >> I would like to be able to get an element pushed with its attributes, and >> I came across the following problem: >> >> cppFunction(' >> std::vector<List> temp(List x){ >> std::vector<List> lower; >> lower.push_back(x); >> return(lower) ; >> } >> ') >> x = list(structure(1L, animal = "cat")) >> temp(x) >> temp(x[1]) >> temp(x[[1]]) # is there a way to not make this output without attributes? >> >> >> >> If I use RObject, it will solve it, but then I would later not be able to >> iterate over the object, because I can't seem to get the .size() of an >> RObject. >> >> Here is the code with the RObject: >> >> >> cppFunction(' >> std::vector<RObject> temp2(RObject x){ >> std::vector<RObject> lower; >> lower.push_back(x); >> return(lower) ; >> } >> ') >> x = list(structure(1L, animal = "cat")) >> temp2(x) >> temp2(x[1]) >> temp2(x[[1]]) # Now it works as I want, but the following wouldn't work: >> >> >> >> >> cppFunction(' >> std::vector<RObject> temp2_fail(RObject x){ >> std::vector<RObject> lower; >> int n x.size(); >> lower.push_back(x); >> return(lower) ; >> } >> ') >> >> >> >> Any ideas? >> >> >> >> >> ----------------Contact >> Details:------------------------------------------------------- >> Contact me: tal.gal...@gmail.com | >> Read me: www.talgalili.com (Hebrew) | www.biostatistics.co.il (Hebrew) | >> www.r-statistics.com (English) >> >> ---------------------------------------------------------------------------------------------- >> >> >> _______________________________________________ >> Rcpp-devel mailing list >> Rcpp-devel@lists.r-forge.r-project.org >> https://lists.r-forge.r-project.org/cgi-bin/mailman/listinfo/rcpp-devel >> > >
_______________________________________________ Rcpp-devel mailing list Rcpp-devel@lists.r-forge.r-project.org https://lists.r-forge.r-project.org/cgi-bin/mailman/listinfo/rcpp-devel