[R] enforce lintr checks (fixes #8012) (#8613)

This commit is contained in:
James Lamb
2022-12-24 15:02:56 -06:00
committed by GitHub
parent f489d824ca
commit c7e82b5914
11 changed files with 13 additions and 15 deletions

View File

@@ -33,7 +33,7 @@ treeInteractions <- function(input_tree, input_max_depth) {
}
# Extract nodes with interactions
interaction_trees <- trees[!is.na(Split) & !is.na(parent_1),
interaction_trees <- trees[!is.na(Split) & !is.na(parent_1), # nolint: object_usage_linter
c('Feature', paste0('parent_feat_', 1:(input_max_depth - 1))),
with = FALSE]
interaction_trees_split <- split(interaction_trees, seq_len(nrow(interaction_trees)))