v0.4.4

只有run_m里加入chunk = 9是有效的. 到estimate的地方, 加入params参数是无效的, 因为model已经固定了

Author: yuki-961004

R/tool_fake_block.R

@@ -27,4 +27,4 @@
   }
 
   return(data)
-}
+}

tests/testthat/test-estimate_2_ABC.R

@@ -17,11 +17,6 @@ testthat::test_that("ABC", {
     ),
 
     models = list(multiRL::TD, multiRL::RSTD, multiRL::Utility),
-    params = list(
-      list(constant = list(chunk = 9)),
-      list(constant = list(chunk = 9)),
-      list(constant = list(chunk = 9)),
-    ),
     priors = list(
       list(
         alpha = function(x) {stats::rbeta(n = 1, shape1 = 2, shape2 = 2)}, 

tests/testthat/test-step_1_run_m.R

@@ -23,6 +23,7 @@ testthat::test_that("Epsilon-First, non-priors, on-policy", {
       ),
       constant = list(
         seed = 123,
+        chunk = NULL,
         L = 0,
         penalty = 1,
         Q0 = NaN,
@@ -77,6 +78,7 @@ testthat::test_that("Epsilon-Greedy, priors, on-policy", {
       ),
       constant = list(
         seed = 123,
+        chunk = NULL,
         L = 1,
         penalty = 1,
         Q0 = 0,
@@ -140,6 +142,7 @@ testthat::test_that("Epsilon-Decreasing, priors, off-policy", {
       ),
       constant = list(
         seed = 123,
+        chunk = 9,
         L = 2,
         penalty = 1,
         Q0 = 0,