update test expectation based to include NAs

* points that fail to transform (because they are outside template brain * see natverse/nat#227
natverse · May 14, 2015 · cb6db3b · cb6db3b
1 parent f13d2a2
commit cb6db3b
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/tests/testthat/test-transformation.r b/tests/testthat/test-transformation.r
@@ -10,7 +10,7 @@ if(is.null(cmtk.bindir())){
   test_that("can mirror FCWB", {
   points.mirror <- mirror_brain(points, FCWB)
 
-  points.mirrorexp <- matrix(c(533.852385, 453.736535, 29.7033156, 110.009148, 29.9916627, 107), ncol=3)
+  points.mirrorexp <- matrix(c(533.852385, NA, 29.7033156, NA, 29.9916627, NA), ncol=3)
   colnames(points.mirrorexp) <- c("X", "Y", "Z")
 
   expect_equal(points.mirror, points.mirrorexp)