I've often used the following paradym in C code to define a list object
returned to R
static const char *outnames[]= {"dvec", "A", "Ainv", "P", ""};
SEXP rval, stemp;
double *dvec, *A, *Ainv;
int *P;
PROTECT(rval = mkNamed(VECSXP, outnames));
stemp= SET_VECTOR_ELT(rval, 0, allocVector(REALSXP, nc));
dvec= REAL(stemp);
stemp = SET_VECTOR_ELT(rval, 1, allocMatrix(REALSXP, nc, nc));
A = REAL(stemp);
Then the code puts values into dvec[i] and etc. and finally returns rval.
I'm missing how to do this when returning a complex value. I've looked
through the
"Writing R extension" manual and have come up dry. What am I missing?
Terry T.
--
Terry M Therneau, PhD
Department of Quantitative Health Sciences
Mayo Clinic
[email protected]
"TERR-ree THUR-noh"
[[alternative HTML version deleted]]
______________________________________________
[email protected] mailing list -- To UNSUBSCRIBE and more, see
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide https://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
