diff options
author | Johannes Ranke <jranke@uni-bremen.de> | 2021-06-12 11:05:24 +0200 |
---|---|---|
committer | Johannes Ranke <jranke@uni-bremen.de> | 2021-06-12 11:05:24 +0200 |
commit | 88cf130615a6cde0c4e65d14db32fed7f6e43085 (patch) | |
tree | ac1ac824277825446b599f131d72b49a78677c7c /tests/testthat | |
parent | 8bf6bd4289f1a0618376406a6a44dd99aedc692f (diff) |
Small cosmetics
Diffstat (limited to 'tests/testthat')
-rw-r--r-- | tests/testthat/test_mixed.R | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/testthat/test_mixed.R b/tests/testthat/test_mixed.R index 5d15530b..9c8a84d7 100644 --- a/tests/testthat/test_mixed.R +++ b/tests/testthat/test_mixed.R @@ -113,7 +113,7 @@ test_that("nlme results are reproducible to some degree", { expect_known_output(print(test_summary, digits = 1), "summary_nlme_biphasic_s.txt") - # k1 just fails the first test (lower bound of the ci), so we need to excluded it + # k1 just fails the first test (lower bound of the ci), so we need to exclude it dfop_no_k1 <- c("parent_0", "k_m1", "f_parent_to_m1", "k2", "g") dfop_sfo_pop_no_k1 <- as.numeric(dfop_sfo_pop[dfop_no_k1]) dfop_sfo_pop <- as.numeric(dfop_sfo_pop) |