search for: yhilo

Displaying 1 result from an estimated 1 matches for "yhilo".

Did you mean: hilo
2003 Dec 30
1
Accuracy: Correct sums in rowSums(), colSums() (PR#6196)
...} #else ! i = cnt = 0; ! if (i < n) { ! if (ISNAN(*rx)) { ! if (keepNA) {sum = NA_REAL; break /* switch */;} ! } else { ! cnt++; sum = *rx; ! } ! i++; rx++; ! } ! for (; i < n; i++, rx++) ! if (!ISNAN(*rx)) { ! /* Kahan summation */ ! double yhilo = *rx - correction; ! double tsum = sum + yhilo; ! correction = (tsum - sum) - yhilo; ! sum = tsum; ! cnt++; ! } else if (keepNA) {sum = NA_REAL; break;} #endif break; *************** *** 1121,1137 **** switch (type) { case REALSXP: rx = REAL(x) + i...