| line |
true |
false |
branch |
|
31
|
1 |
1047 |
if (ref $_indexs[0] and Rstats::Func::is_array($r, $_indexs[0]) and Rstats::Func::is_logical($r, $_indexs[0]) and Rstats::Func::dim($r, $_indexs[0])->get_length > 1) { } |
|
38
|
6 |
3 |
unless $x2_values->[$i] |
|
48
|
3062 |
8 |
defined $_index ? : |
|
50
|
3043 |
12 |
if (@$index_values and not Rstats::Func::is_character($r, $index) and not Rstats::Func::is_logical($r, $index)) |
|
53
|
0 |
3104 |
if ($index_value == 0) { } |
|
57
|
19 |
3085 |
if $index_value < 0 |
|
60
|
0 |
3043 |
if $minus_count > 0 and $minus_count != @$index_values |
|
62
|
10 |
3033 |
if $minus_count > 0 |
|
65
|
15 |
3055 |
if (not @{$index->values;}) { } |
|
|
2 |
3053 |
elsif (Rstats::Func::is_character($r, $index)) { } |
|
|
10 |
3043 |
elsif (Rstats::Func::is_logical($r, $index)) { } |
|
|
10 |
3033 |
elsif ($index->{'_minus'}) { } |
|
70
|
2 |
0 |
if (Rstats::Func::is_vector($r, $x1)) { } |
|
|
0 |
0 |
elsif (Rstats::Func::is_matrix($r, $x1)) { } |
|
76
|
4 |
8 |
if ($name eq $x1_name) |
|
82
|
0 |
4 |
unless defined $value |
|
97
|
22 |
14 |
if $index_values->[$i] |
|
105
|
14 |
19 |
unless grep {$_ == -$k;} @{$index->values;} |
|
113
|
161 |
2909 |
unless $count == 1 and $drop |
|
115
|
948 |
99 |
unless @x2_dim |