From 96634c3aefd2456f8c5dd7a0fbb97f75941cbce7 Mon Sep 17 00:00:00 2001
From: Chitu Okoli <Chitu.Okoli@skema.edu>
Date: Fri, 27 Sep 2024 13:22:58 +0200
Subject: [PATCH] Swapped order of expect_equal

---
 tests/testthat/test-autogam.R               | 4 ++--
 tests/testthat/test-smooth_formula_string.R | 5 +++--
 2 files changed, 5 insertions(+), 4 deletions(-)

diff --git a/tests/testthat/test-autogam.R b/tests/testthat/test-autogam.R
index 35ffb08..692d11d 100644
--- a/tests/testthat/test-autogam.R
+++ b/tests/testthat/test-autogam.R
@@ -1,9 +1,9 @@
 test_that("autogam works on mtcars", {
   expect_equal(
-    11.253,
     autogam(mtcars, 'mpg') |>
       coef() |>
       sum() |>
-      round(3)
+      round(3),
+    11.253
   )
 })
diff --git a/tests/testthat/test-smooth_formula_string.R b/tests/testthat/test-smooth_formula_string.R
index fa284f6..e5e8294 100644
--- a/tests/testthat/test-smooth_formula_string.R
+++ b/tests/testthat/test-smooth_formula_string.R
@@ -1,6 +1,7 @@
 test_that("mtcars smooth string works", {
   expect_equal(
-    "mpg ~ cyl + s(disp) + s(hp) + s(drat) + s(wt) + s(qsec) + vs + am + gear + s(carb,k=3)",
-    smooth_formula_string(mtcars, 'mpg')
+    smooth_formula_string(mtcars, 'mpg'),
+    "mpg ~ cyl + s(disp) + s(hp) + s(drat) + s(wt) + s(qsec) + vs + am + gear + s(carb,k=3)"
+
   )
 })