From dd650d02b6dbb27f1175db50eb7ff1ca553a58a6 Mon Sep 17 00:00:00 2001
From: samuelsmock <smock.samuel@gmail.com>
Date: Fri, 16 Feb 2024 21:59:46 -0600
Subject: [PATCH] halfway through adding manipulations, still needs adding in
 simulate_choices, and some tests

---
 tests/manual-tests/SE_Drive.R | 2 +-
 tests/testthat/test-sim_all.R | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/tests/manual-tests/SE_Drive.R b/tests/manual-tests/SE_Drive.R
index 06a6c1f..bb51275 100644
--- a/tests/manual-tests/SE_Drive.R
+++ b/tests/manual-tests/SE_Drive.R
@@ -51,4 +51,4 @@ ul<-list( u1 =
 destype="ngene"
 
 sedrive <- sim_all(nosim = nosim, resps=resps, destype = destype,
-                   designpath = designpath, u=ul, bcoeff = bcoeff, decisiongroups = decisiongroups)
+                   designpath = designpath, u=ul, bcoeff = bcoeff, decisiongroups = decisiongroups, manipulations = manipulations)
diff --git a/tests/testthat/test-sim_all.R b/tests/testthat/test-sim_all.R
index ad48d77..a1ea894 100644
--- a/tests/testthat/test-sim_all.R
+++ b/tests/testthat/test-sim_all.R
@@ -272,4 +272,4 @@ ul<- list(u1= list(
             v3 =V.3 ~ basc)
 )
 
-comprehensive_design_test(nosim=nosim, resps=resps, destype=destype, designpath=designpath, ul = ul, bcoeff = bcoeff, decisiongroups = dgFeed)
+## comprehensive_design_test(nosim=nosim, resps=resps, destype=destype, designpath=designpath, ul = ul, bcoeff = bcoeff, decisiongroups = dgFeed)
-- 
GitLab