3 void c_kurt(DCELL * result, DCELL * values,
int n,
const void *closure)
5 DCELL sum, ave, sumsq, sumqt, var;
12 for (i = 0; i <
n; i++) {
29 for (i = 0; i <
n; i++) {
37 sumqt += d * d * d * d;
42 *result = sumqt / (count * var * var) - 3;
45 void w_kurt(DCELL * result, DCELL(*values)[2],
int n,
const void *closure)
47 DCELL sum, ave, sumsq, sumqt, var;
54 for (i = 0; i <
n; i++) {
58 sum += values[i][0] * values[i][1];
59 count += values[i][1];
71 for (i = 0; i <
n; i++) {
77 d = values[i][0] - ave;
78 sumsq += d * d * values[i][1];
79 sumqt += d * d * d * values[i][1];
84 *result = sumqt / (count * var * var) - 3;
void G_set_d_null_value(DCELL *dcellVals, int numVals)
int G_is_d_null_value(const DCELL *dcellVal)
Returns 1 if dcell is NULL, 0 otherwise. This will test if the value dcell is a NaN. Same test as in G_is_f_null_value().
void w_kurt(DCELL *result, DCELL(*values)[2], int n, const void *closure)
void c_kurt(DCELL *result, DCELL *values, int n, const void *closure)