fix typo in tests

paul-buerkner · Jun 24, 2024 · 25aa0b6 · 25aa0b6
1 parent 34ac048
commit 25aa0b6
Showing 1 changed file with 7 additions and 7 deletions.
diff --git a/tests/testthat/tests.priorsense.R b/tests/testthat/tests.priorsense.R
@@ -8,13 +8,13 @@ fit1 <- rename_pars(brms:::brmsfit_example1)
 
 test_that("create_priorsense_data returns expected output structure", {
   psd1 <- create_priorsense_data(fit1)
-  expect_s3_class(psd$draws, "draws")
-  expect_s3_class(psd$fit, "brmsfit")
-  expect_s3_class(psd$log_lik, "draws")
-  expect_s3_class(psd$log_prior, "draws")
-  expect_true(is.function(psd$log_lik_fn))
-  expect_true(is.function(psd$log_prior_fn))
-  expect_true(is.function(psd$log_ratio_fn))
+  expect_s3_class(psd1$draws, "draws")
+  expect_s3_class(psd1$fit, "brmsfit")
+  expect_s3_class(psd1$log_lik, "draws")
+  expect_s3_class(psd1$log_prior, "draws")
+  expect_true(is.function(psd1$log_lik_fn))
+  expect_true(is.function(psd1$log_prior_fn))
+  expect_true(is.function(psd1$log_ratio_fn))
 })
 
 test_that("powerscale returns without error", {