[ci] [R-package] Add any_is_na_linter (#5306)

microsoft · Jun 20, 2022 · 64f4a9f · 64f4a9f
1 parent 560c884
commit 64f4a9f
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 1 deletion.
diff --git a/.ci/lint_r_code.R b/.ci/lint_r_code.R
@@ -30,6 +30,7 @@ interactive_text <- paste0(
 
 LINTERS_TO_USE <- list(
     "absolute_path"          = lintr::absolute_path_linter()
+    , "any_is_na_linter"     = lintr::any_is_na_linter()
     , "assignment"           = lintr::assignment_linter()
     , "braces"               = lintr::brace_linter()
     , "commas"               = lintr::commas_linter()

diff --git a/R-package/tests/testthat/test_metrics.R b/R-package/tests/testthat/test_metrics.R
@@ -6,5 +6,5 @@ test_that(".METRICS_HIGHER_BETTER() should be well formed", {
     # no metrics should be repeated
     expect_true(length(unique(metric_names)) == length(metrics))
     # should not be any NAs
-    expect_false(any(is.na(metrics)))
+    expect_false(anyNA(metrics))
 })