8 double sum = 0, sumsq = 0, sumabs = 0;
9 double dev = 0, dev2 = 0;
13 stats->max = data[
count - 1];
15 for (i = 0; i <
count; i++) {
17 sumabs += fabs(data[i]);
18 sumsq += data[i] * data[i];
21 stats->sumabs = sumabs;
24 stats->mean = stats->sum / stats->count;
25 stats->meanabs = stats->sumabs / stats->count;
26 for (i = 0; i <
count; i++) {
27 dev2 = dev2 + (data[i] - stats->mean) * (data[i] - stats->mean);
28 dev = dev + (data[i] - stats->mean);
31 stats->var = (dev2 - (dev * dev / stats->count)) / stats->count;
32 stats->stdev = sqrt(stats->var);