Branch Coverage

blib/lib/Statistics/R/REXP/Double.pm

Criterion	Covered	Total	%
branch	7	8	87.5

line	true	false	branch
24	1656	14	if (ref $attributes->{'elements'} eq 'ARRAY')
26	7028	55	&looks_like_number($_) ? :
39	7028	55	if defined $_
	0	1667	if defined $self->elements and grep {not &looks_like_number($_) if defined $_;} @{$self->elements;}