[go: up one dir, main page]
Menu ▾ ▴

[ac9e29]: / bin / stats.awk  Maximize  Restore  History

Download this file

23 lines (22 with data), 412 Bytes 

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
#!/usr/bin/awk -f

BEGIN { n = 0; m = 0.0; } {

    if (NF == 1) {

        n++;

        a[$1]++;

        m += $1;

    } else if (NF == 2) {

        n += $1;

        a[$2] += $1;

        m += $1 * $2;

    }

} END {

    v = 0.0;

    if (n != 0) {

        m /= n;

        for (x in a) {

            v += (x - m) * (x - m) * a[x];

        }

        v = sqrt(v / n);

    }

    printf "n=%d mean=%f sd=%f\n", n, m, v;

}