blib/lib/Statistics/R/REXP/Complex.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 9 | 10 | 90.0 |
line | true | false | branch |
---|---|---|---|
23 | 117 | 13 | if (ref $attributes->{'elements'} eq 'ARRAY') |
25 | 44 | 21 | &looks_like_number($_) ? : |
154 | 65 | &blessed($_) && $_->isa('Math::Complex') ? : | |
41 | 198 | 21 | if defined $_ |
43 | 0 | 127 | if defined $self->elements and grep {not &blessed($_) && $_->isa('Math::Complex') || &Scalar::Util::looks_like_number($_) if defined $_;} @{$self->elements;} |