diff options
Diffstat (limited to 'tests')
-rw-r--r-- | tests/figs/evaluations-according-to-2015-nafta-guidance/plot-nafta-analysis.svg (renamed from tests/figs/evaluations-according-to-the-nafta-guidance-from-2015/plot-nafta-analysis-sop-appendix-d.svg) | 0 | ||||
-rw-r--r-- | tests/testthat/test_nafta.R | 4 |
2 files changed, 2 insertions, 2 deletions
diff --git a/tests/figs/evaluations-according-to-the-nafta-guidance-from-2015/plot-nafta-analysis-sop-appendix-d.svg b/tests/figs/evaluations-according-to-2015-nafta-guidance/plot-nafta-analysis.svg index 58f57e93..58f57e93 100644 --- a/tests/figs/evaluations-according-to-the-nafta-guidance-from-2015/plot-nafta-analysis-sop-appendix-d.svg +++ b/tests/figs/evaluations-according-to-2015-nafta-guidance/plot-nafta-analysis.svg diff --git a/tests/testthat/test_nafta.R b/tests/testthat/test_nafta.R index 3615c278..10de3ce0 100644 --- a/tests/testthat/test_nafta.R +++ b/tests/testthat/test_nafta.R @@ -16,7 +16,7 @@ # You should have received a copy of the GNU General Public License along with # this program. If not, see <http://www.gnu.org/licenses/> -context("Evaluations according to the NAFTA guidance from 2015") +context("Evaluations according to 2015 NAFTA guidance") test_that("Data for more than one compound are rejected", expect_error(nafta(FOCUS_2006_D))) @@ -40,5 +40,5 @@ test_that("Test data from Appendix D are correctly evaluated", { expect_known_output(print(res), "print_nafta_analysis.txt") plot_nafta <- function() plot(res) - vdiffr::expect_doppelganger("Plot NAFTA analysis SOP Appendix D", plot_nafta) + vdiffr::expect_doppelganger("Plot NAFTA analysis", plot_nafta) }) |