create a_regress_simple_evar
[liba.git] / src / regress.c
blobf3658c63ae593d5da66dccbc769804742ebae3bb
1 #include "a/regress.h"
3 void a_regress_odm_(a_size n, a_float const *p, a_float *odm, a_float p_mean)
5 for (; n; --n) { *odm++ = *p++ - p_mean; }
8 a_float a_regress_odm(a_size n, a_float const *p, a_float *odm)
10 a_float m = a_float_mean(p, n);
11 a_regress_odm_(n, p, odm, m);
12 return m;