| blib/lib/Statistics/R/REXP/Complex.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 10 | 90.0 |
| line | true | false | branch |
|---|---|---|---|
| 23 | 179 | 14 | if (ref $attributes->{'elements'} eq 'ARRAY') |
| 25 | 46 | 30 | &looks_like_number($_) ? : |
| 242 | 76 | &blessed($_) && $_->isa('Math::Complex') ? : | |
| 41 | 288 | 30 | if defined $_ |
| 43 | 0 | 190 | if defined $self->elements and grep {not &blessed($_) && $_->isa('Math::Complex') || &Scalar::Util::looks_like_number($_) if defined $_;} @{$self->elements;} |