Branch Coverage

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