From a8b43213bcc5b6899509ae1d270eb209ffbd35c1 Mon Sep 17 00:00:00 2001 From: Rich FitzJohn Date: Tue, 17 Sep 2024 07:30:29 +0100 Subject: [PATCH] Fix tests --- tests/testthat/test-model-wrappers.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/tests/testthat/test-model-wrappers.R b/tests/testthat/test-model-wrappers.R index dda106d..ee0005c 100644 --- a/tests/testthat/test-model-wrappers.R +++ b/tests/testthat/test-model-wrappers.R @@ -76,11 +76,11 @@ test_that("can compute multiple gradients", { m <- monty_example("banana") expect_equal(monty_model_gradient(m, c(0, 0)), c(0, 0)) expect_equal(monty_model_gradient(m, c(0, 0), named = TRUE), - c(a = 0, b = 0)) + c(alpha = 0, beta = 0)) p <- cbind(c(0, 0), c(1, 0), c(0, 1)) expect_equal(monty_model_gradient(m, p), rbind(c(0, -4, 4), c(0, 0, -9))) expect_equal(monty_model_gradient(m, p, named = TRUE), - rbind(a = c(0, -4, 4), b = c(0, 0, -9))) + rbind(alpha = c(0, -4, 4), beta = c(0, 0, -9))) })