From 0c5a1a537d76c2feb3bdf06106300cd1a9e731c1 Mon Sep 17 00:00:00 2001 From: Daniel Date: Sun, 27 Oct 2024 18:41:59 +0100 Subject: [PATCH] update test --- tests/testthat/_snaps/printing.md | 6 +----- tests/testthat/test-printing.R | 2 +- 2 files changed, 2 insertions(+), 6 deletions(-) diff --git a/tests/testthat/_snaps/printing.md b/tests/testthat/_snaps/printing.md index e8ba82040..cf03e1e23 100644 --- a/tests/testthat/_snaps/printing.md +++ b/tests/testthat/_snaps/printing.md @@ -347,7 +347,7 @@ Uncertainty intervals (equal-tailed) and p-values (two-tailed) computed using a Wald t-distribution approximation. -# message about interpretation of log-resoponse +# no more message about interpretation of log-resoponse Code print(out) @@ -360,8 +360,4 @@ Uncertainty intervals (equal-tailed) and p-values (two-tailed) computed using a Wald t-distribution approximation. - - The model has a log-transformed response variable, and exponentiated - parameters are reported. A one-unit increase in the predictor is - associated with multiplying the outcome by that predictor's coefficient. diff --git a/tests/testthat/test-printing.R b/tests/testthat/test-printing.R index 462689fa7..ee0633efa 100644 --- a/tests/testthat/test-printing.R +++ b/tests/testthat/test-printing.R @@ -112,7 +112,7 @@ withr::with_options( withr::with_options( list(parameters_warning_exponentiate = TRUE), { - test_that("message about interpretation of log-resoponse", { + test_that("no more message about interpretation of log-resoponse", { data(mtcars) m <- lm(log(mpg) ~ gear, data = mtcars) out <- model_parameters(m, exponentiate = TRUE)