Displaying 1 result from an estimated 1 matches for "q_new_c".
Did you mean:
_new_
2018 Feb 02
1
R-gui sessions end when executing C-code
...lize new vectors not given as input */
SEXP q_copy = PROTECT(duplicate(q)); n_prot++;
double *q_c; q_c = REAL(q_copy);
SEXP q_new = PROTECT(allocVector(REALSXP,length(q))); n_prot++;
double *q_new_c; q_new_c = REAL(q_new);
SEXP eta = PROTECT(allocVector(REALSXP,H_c)); n_prot++;
double *eta_c; eta_c = REAL(eta);
SEXP exp_eta = PROTECT(allocVector(REALSXP,H_c)); n_prot++;
double *exp_eta...