diff --git a/tests/testthat/test-rcpp-recruitment-interface.R b/tests/testthat/test-rcpp-recruitment-interface.R index 73ff3437a..3d8242db1 100644 --- a/tests/testthat/test-rcpp-recruitment-interface.R +++ b/tests/testthat/test-rcpp-recruitment-interface.R @@ -33,11 +33,5 @@ test_that("Recruitment input settings work as expected", { expected_lpdf <- sum(log(stats::dnorm(log_devs, 0, 0.7))) - recruitment$estimate_log_devs <- FALSE - expect_equal(recruitment$evaluate_lpdf(), 0.0) - - recruitment$estimate_log_devs <- TRUE - expect_equal(recruitment$evaluate_lpdf(), expected = expected_lpdf) - clear() })