anyNA

tdhock · tdhock · commit 49d027ac1591 · 2015-03-18T12:04:30.000-04:00
diff --git a/tests/testthat/test-ggplot-rect.R b/tests/testthat/test-ggplot-rect.R
@@ -31,7 +31,7 @@ test_that('geom_rect becomes 1 trace with mode="lines" fill="tozerox"', {
   expect_identical(tr$type, "scatter")
   expect_identical(tr$mode, "lines")
   for(xy in c("x", "y")){
-    expect_true(any(is.na(tr[[xy]])))
+    expect_true(anyNA(tr[[xy]]))
   }
 })
 

Original file line number	Diff line number	Diff line change
`@@ -31,7 +31,7 @@ test_that('geom_rect becomes 1 trace with mode="lines" fill="tozerox"', {`
`31`	`31`	`expect_identical(tr$type, "scatter")`
`32`	`32`	`expect_identical(tr$mode, "lines")`
`33`	`33`	`for(xy in c("x", "y")){`
`34`		`- expect_true(any(is.na(tr[[xy]])))`
	`34`	`+ expect_true(anyNA(tr[[xy]]))`
`35`	`35`	`}`
`36`	`36`	`})`
`37`	`37`