| line |
true |
false |
branch |
|
115
|
36 |
22 |
ref $args[0] ? : |
|
116
|
9 |
49 |
if defined $args->{'observed'} |
|
120
|
550 |
700 |
if ($_ == 0 or $data->[$_] ne $$data[$_ - 1]) |
|
143
|
0 |
6 |
ref $args[0] ? : |
|
147
|
5 |
1 |
if (scalar @{$data;}) { } |
|
148
|
3 |
2 |
if (scalar @states > 1) { } |
|
149
|
3 |
0 |
$data->[0] eq $states[0] ? : |
|
155
|
11 |
53 |
if ($data->[$_] ne $$data[$_ - 1]) |
|
156
|
5 |
6 |
if ($data->[$_] eq $states[0]) { } |
|
169
|
5 |
1 |
wantarray ? : |
|
190
|
33 |
3 |
if ($sum) |
|
216
|
32 |
3 |
if ($sum) |
|
217
|
4 |
28 |
if ($sum < 2) { } |
|
278
|
0 |
0 |
if ($sum and $n1 != $n2) |
|
301
|
0 |
0 |
if (defined $sum) |
|
396
|
1 |
7 |
ref $args[0] ? : |
|
398
|
1 |
7 |
if $observed == 0 |
|
407
|
4 |
3 |
defined $args->{'ccorr'} ? : |
|
437
|
1 |
18 |
ref $args[0] ? : |
|
443
|
9 |
10 |
$args->{'exact'} ? : |
|
461
|
3 |
2 |
$n1 > 20 || $n2 > 20 ? : |
|
482
|
62 |
37 |
ref $args[0] ? : |
|
487
|
0 |
99 |
if $args->{'trials'} |
|
488
|
17 |
82 |
if ref $args->{'freqs'} |
|
502
|
7 |
75 |
if (not $nstates) { } |
|
|
27 |
48 |
elsif ($nstates == 1) { } |
|
|
0 |
48 |
elsif ($nstates > 2) { } |
|
590
|
0 |
0 |
ref $args[0] ? : |
|
609
|
8 |
1 |
if (&all(sub {
is_numeric($_);
}
, $vals->{'observed'}, $vals->{'expected'})) { } |
|
611
|
6 |
2 |
$vals->{'observed'} - $vals->{'expected'} >= 0 ? : |
|
614
|
2 |
6 |
if ($args->{'precision_p'}) |
|
627
|
1 |
9 |
if (not $vals->{'expected'}) { } |
|
|
2 |
7 |
elsif (not $vals->{'variance'}) { } |
|
639
|
2 |
5 |
defined $args->{'ccorr'} ? : |
|
648
|
99 |
92 |
if (is_even($u)) { } |
|
669
|
0 |
583 |
if $k > $n or $k < 0 |
|
670
|
68 |
515 |
if $n - $k < $k |
|
682
|
71 |
0 |
if (&all(sub {
is_int($_);
}
, $n1, $n2)) |
|
690
|
18 |
119 |
ref $args->{'data'} ? : |