Displaying 1 result from an estimated 1 matches for "embedr".
Did you mean:
embed
2009 Sep 03
1
Running an expression 1MN times using embedded R
...cmdexpr = PROTECT(R_ParseVector(cmdSexp, -1, &status, R_NilValue));
if (status != PARSE_OK) {
UNPROTECT(2);
return(R_NilValue);
}
for(i = 0; i < Rf_length(cmdexpr); i++)
ans = R_tryEval(VECTOR_ELT(cmdexpr, i),NULL,&Rerr);
UNPROTECT(2);
return(ans);
}
int embedR(int argc, char **argv){
structRstart rp;
Rstart Rp = &rp;
R_DefParams(Rp);
Rp->NoRenviron = 0;
Rp->R_Interactive = (Rboolean)1;
R_SetParams(Rp);
R_SignalHandlers=0;
if (!getenv("R_HOME")) {
fprintf(stderr, "R_HOME is not set. Please set all requ...