| 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;} |