Branch Coverage

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

Criterion	Covered	Total	%
branch	3	4	75.0

line	true	false	branch
22	3411	20	if (ref $attributes->{'elements'} eq 'ARRAY')
36	0	3428	if defined $self->elements and grep {ref $_;} @{$self->elements;}