Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
Print out kmeans_bad test for debugging.
  • Loading branch information
maggiexyz committed Aug 27, 2015
1 parent 45fe457 commit 315b975
Showing 1 changed file with 1 addition and 0 deletions.
1 change: 1 addition & 0 deletions t/stats_kmeans.t
Expand Up @@ -194,6 +194,7 @@ sub t_kmeans_bad {
my $data = sequence 7, 3;
$data = $data->setbadat(4,0);
my %m = $data->kmeans({NCLUS=>2, NTRY=>10, V=>0});
print "$_\t$m{$_}\n" for (sort keys %m);
return sum( $m{ms}->sumover - pdl qw( 1.5 1.9166667 1.9166667 ) );
}

Expand Down

0 comments on commit 315b975

Please sign in to comment.