try to avoid checking environments for keras objects

topepo · topepo · commit 65e960c30177 · 2021-01-12T09:46:11.000-05:00
diff --git a/tests/testthat/test_linear_reg_keras.R b/tests/testthat/test_linear_reg_keras.R
@@ -52,7 +52,7 @@ test_that('model fitting', {
     regexp = NA
   )
   fit1$elapsed <- fit2$elapsed
-  expect_equal(fit1, fit2)
+  expect_equal(fit1, fit2, check.environments = FALSE)
 
   expect_error(
     fit(
diff --git a/tests/testthat/test_logistic_reg_keras.R b/tests/testthat/test_logistic_reg_keras.R
@@ -65,7 +65,7 @@ test_that('model fitting', {
     regexp = NA
   )
   fit1$elapsed <- fit2$elapsed
-  expect_equal(fit1, fit2)
+  expect_equal(fit1, fit2, check.environments = FALSE)
 
   expect_error(
     fit(
diff --git a/tests/testthat/test_multinom_reg_keras.R b/tests/testthat/test_multinom_reg_keras.R
@@ -61,7 +61,7 @@ test_that('model fitting', {
     regexp = NA
   )
   fit1$elapsed <- fit2$elapsed
-  expect_equal(fit1, fit2)
+  expect_equal(fit1, fit2, check.environments = FALSE)
 
   expect_error(
     fit(

Original file line number	Diff line number	Diff line change
`@@ -52,7 +52,7 @@ test_that('model fitting', {`
`52`	`52`	`regexp = NA`
`53`	`53`	`)`
`54`	`54`	`fit1$elapsed <- fit2$elapsed`
`55`		`- expect_equal(fit1, fit2)`
	`55`	`+ expect_equal(fit1, fit2, check.environments = FALSE)`
`56`	`56`
`57`	`57`	`expect_error(`
`58`	`58`	`fit(`
Original file line number	Diff line number	Diff line change
`@@ -65,7 +65,7 @@ test_that('model fitting', {`
`65`	`65`	`regexp = NA`
`66`	`66`	`)`
`67`	`67`	`fit1$elapsed <- fit2$elapsed`
`68`		`- expect_equal(fit1, fit2)`
	`68`	`+ expect_equal(fit1, fit2, check.environments = FALSE)`
`69`	`69`
`70`	`70`	`expect_error(`
`71`	`71`	`fit(`
Original file line number	Diff line number	Diff line change
`@@ -61,7 +61,7 @@ test_that('model fitting', {`
`61`	`61`	`regexp = NA`
`62`	`62`	`)`
`63`	`63`	`fit1$elapsed <- fit2$elapsed`
`64`		`- expect_equal(fit1, fit2)`
	`64`	`+ expect_equal(fit1, fit2, check.environments = FALSE)`
`65`	`65`
`66`	`66`	`expect_error(`
`67`	`67`	`fit(`