From ffc12f79fdb283bc59f073208c883b84271be121 Mon Sep 17 00:00:00 2001 From: Johannes Ranke Date: Fri, 15 May 2015 14:04:49 +0200 Subject: Make mkinmod quiet in tests --- tests/testthat/test_synthetic_data_for_UBA_2014.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'tests/testthat/test_synthetic_data_for_UBA_2014.R') diff --git a/tests/testthat/test_synthetic_data_for_UBA_2014.R b/tests/testthat/test_synthetic_data_for_UBA_2014.R index 2bf01075..25f841b1 100644 --- a/tests/testthat/test_synthetic_data_for_UBA_2014.R +++ b/tests/testthat/test_synthetic_data_for_UBA_2014.R @@ -21,12 +21,12 @@ context("Results for synthetic data established in expertise for UBA (Ranke 2014 m_synth_SFO_lin <- mkinmod(parent = list(type = "SFO", to = "M1"), M1 = list(type = "SFO", to = "M2"), - M2 = list(type = "SFO"), use_of_ff = "max") + M2 = list(type = "SFO"), use_of_ff = "max", quiet = TRUE) m_synth_DFOP_par <- mkinmod(parent = list(type = "DFOP", to = c("M1", "M2")), M1 = list(type = "SFO"), - M2 = list(type = "SFO"), use_of_ff = "max") + M2 = list(type = "SFO"), use_of_ff = "max", quiet = TRUE) fit_SFO_lin_a <- mkinfit(m_synth_SFO_lin, synthetic_data_for_UBA_2014[[1]]$data, -- cgit v1.2.1