blib/lib/Statistics/Descriptive/LogScale.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 52 | 68 | 76.4 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
224 | 33 | 9 | 4 | $opt{'linear_width'} and not $opt{'linear_thresh'} |
489 | 0 | 0 | 48 | 0 <= $x and $x <= 100 |
575 | 1 | 1 | 0 | $@ and not $@ =~ /division.*zero/ |
884 | 0 | 0 | 294 | $k == 0 + $k and $v == 0 + $v |
0 | 1 | 292 | $k == 0 + $k and $v == 0 + $v and $v < $INF | |
995 | 22 | 2 | 0 | exists $opt{$_} and $raw->{$_} = $opt{$_} |
1203 | 1 | 3 | 0 | $max < $_->[0] and $max = $_->[0] |
1246 | 0 | 0 | 1 | defined $newmin and $newmin > $min |
1250 | 0 | 0 | 1 | defined $newmax and $newmax < $max |
1379 | 3 | 1 | 1 | $method eq 'percentile' and not defined $result |
1482 | 1 | 20 | 126 | @$array and $array->[0] < $x |
1494 | 11 | 59 | 4 | defined $array->[$i] and $array->[$i] == $x |
1520 | 1537 | 18 | 237 | $self->{'linear_width'} && $self->{'linear_width'} * floor($x / $self->{'linear_width'} + 0.5) |
1536 | 67 | 0 | 121 | $self->{'linear_width'} && $self->{'linear_width'} * (floor($x / $self->{'linear_width'} + 0.5) - 0.5) |
line | l | !l | condition |
---|---|---|---|
209 | 29 | 17 | $opt{'base'} ||= 1.0099743512671 |
225 | 15 | 31 | $opt{'linear_thresh'} ||= 0 |
549 | 1 | 0 | $lower ||= 0 |
899 | 200 | 91 | $self->{'data'}{$key} || 0 |
906 | 10 | 2 | delete $self->{'data'}{$key} || 0 |
943 | 1 | 1 | $opt{'noize_thresh'} || 0 |
1554 | 159 | 32 | $self->{'cache'}{'sorted'} ||= [(sort {$a <=> $b;} keys %{$$self{'data'};})] |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
219 | 8 | 1 | 4 | $opt{'linear_width'} ||= $opt{'linear_thresh'} * ($opt{'base'} - 1) |
247 | 13 | 2 | 0 | $opt{'linear_width'} || 2 * $self->{'linear_thresh'} |
1082 | 20 | 3 | 166 | defined $realmin or defined $realmax |
1560 | 87 | 20 | 0 | $self->{'cache'}{'probability'} ||= do { my @array; my $sum = 0; foreach $_ (@{$self->_sort;}) { $sum += $self->{'data'}{$_}; push @array, $sum; }; \@array } |