change fig1 code

mikelove · Jan 20, 2021 · 63da66a · 63da66a
1 parent c473099
commit 63da66a
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/tests/testthat/test_mrlocus.R b/tests/testthat/test_mrlocus.R
@@ -7,8 +7,8 @@ test_that("mrlocus works on simple sim data", {
   data <- makeSimDataForMrlocus(n_mult=10)
   #set.seed(2)
   #data <- makeSimDataForMrlocus(n_mult=10,sigma=.5)
-  #set.seed(2)
-  #data <- makeSimDataForMrlocus(alpha=0,n_mult=10,sigma=.5)
+  set.seed(2)
+  data <- makeSimDataForMrlocus(alpha=0,n_mult=10,sigma=1)
   plotInitEstimates(data)
   dev.off()