Displaying 1 result from an estimated 1 matches for "rphit".
Did you mean:
rohit
2011 Oct 24
2
C function is wrong under Windows 7
...eVector(fchr, REALSXP));
PROTECT(sign = coerceVector(sign, REALSXP));
nfchr = length(fchr);
nsign = length(sign);
SEXP es;
PROTECT(es = allocVector(REALSXP, nfchr));
res = REAL(es);
double nr = getNr(rfchr, rsign, nsign);
SEXP phit;
PROTECT(phit = allocVector(REALSXP, nfchr));
double *rphit;
rphit = REAL(phit);
for(i = 0; i < nfchr; i++) rphit[i] = 0.0;
getPhit(rfchr, rsign, nsign, nr, rphit);
cumsum(rphit, nfchr);
SEXP pmiss;
PROTECT(pmiss = allocVector(REALSXP, nfchr));
double *rpmiss;
rpmiss = REAL(pmiss);
for(i = 0; i < nfchr; i++) rpmiss[i] = 0.0;
getPmiss(rsign,...