Re: [Bug-gnubg] GnuBG Rocks!

[Rod Roark]

On Wednesday 04 June 2003 01:09 am, Joern Thyssen wrote:
> ...
> It would still be nice to collect some statistics about the rating, so we
> can say: "gnubg playing at 2-ply 33% is rated 1900 +/- 40 at FIBS".

Here are some stats for the past 4 days of ParlorBot matches:

Number of samples  : 436
Mean               : 2027.279404
Standard Deviation : 19.468276

And the program I used to calculate this:

----------------------------------------------------------------------
#!/usr/bin/perl
use strict;

my $count       = 0;
my $sum         = 0;
my $sum_squares = 0;
my $last_value  = 0;

while (<STDIN>) {
        if (m/From FIBS: 5 ParlorBot - - \d+ \d+ (\d+\.\d+) /) {
                if ($1 != $last_value) {
                        $last_value = $1;
                        ++$count;
                        $sum += $1;
                        $sum_squares += $1 * $1;
                }
        }
}

if ($count > 0) {
        my $mean = $sum / $count;
        printf "Number of samples  : %d\n", $count;
        printf "Mean               : %f\n", $mean;
        printf "Standard Deviation : %f\n", sqrt(($sum_squares / $count) - 
($mean * $mean));
}
else {
        print "No samples found.\n";
}
----------------------------------------------------------------------