Make the Hessian calculation use the new all_matches vector.

[wloh] / train.pl

diff --git a/train.pl b/train.pl
index e55f37c307f8489db4c75673af2c1158dcbbb4c9..22a2741ccb8b12a71a81d1d9c065461cc4f00dd3 100755 (executable)
--- a/train.pl
+++ b/train.pl
@@ -49,6 +49,7 @@ $q->execute($last_season);
 while (my $ref = $q->fetchrow_hashref) {
        next if ($ref->{'maalfor'} == 150 && $ref->{'maalmot'} == 0);
        next if ($ref->{'maalfor'} == 0 && $ref->{'maalmot'} == 150);
+       next if ($ref->{'maalfor'} == 150 && $ref->{'maalmot'} == 150);
        printf DATA "%d %d %d %d %f\n", $ref->{'p1'}, $ref->{'p2'}, $ref->{'maalfor'}, $ref->{'maalmot'}, $ref->{'vekt'};
 }
 
@@ -57,7 +58,7 @@ close DATA;
 $dbh->do('DELETE FROM ratings');
 my $iq = $dbh->prepare('INSERT INTO ratings ( id, rating ) VALUES (?, ?)');
 
-open RATINGS, "/home/sesse/dev/bayeswf/bayeswf < $tmpnam |"
+open RATINGS, "$config::base_dir/bayeswf < $tmpnam |"
        or die "bayeswf: $!";
 while (<RATINGS>) {
        /(.*) (.*)/ or next;