change file name

MatsuuraKentaro · Nov 4, 2024 · 03b7e3e · 03b7e3e
1 parent 352a5b4
commit 03b7e3e
Show file tree

Hide file tree

Showing 4 changed files with 3 additions and 3 deletions.
diff --git a/data-raw/generate_allocation_rule_files_for_test.R b/data-raw/generate_allocation_rule_files_for_test.R
@@ -11,6 +11,6 @@ allocation_rule <- learn_allocation_rule(
   models, N_total = 150, N_ini = rep(10, 5), N_block = 10, Delta = 1.3,
   outcome_type = "continuous", sd_normal = sqrt(4.5), seed = 314, 
   rl_config = rl_config_set(iter = 1, model = rl_dnn_config(fcnet_hiddens = c(1, 1))),
-  output_dir = "for_test", output_base_dir = "inst/allocation_rules",
+  output_dir = "allocation_rule_for_test", output_base_dir = "inst/extdata",
   alpha = 0.025
 )
diff --git a/inst/extdata/for_test/policy_state.pkl → ...allocation_rule_for_test/policy_state.pkl b/inst/extdata/for_test/policy_state.pkl → ...allocation_rule_for_test/policy_state.pkl
diff --git a/inst/extdata/for_test/rllib_checkpoint.json → ...ation_rule_for_test/rllib_checkpoint.json b/inst/extdata/for_test/rllib_checkpoint.json → ...ation_rule_for_test/rllib_checkpoint.json
diff --git a/tests/testthat/test-allocation_rule.R b/tests/testthat/test-allocation_rule.R
@@ -1,8 +1,8 @@
 skip_on_cran()
 
-file_name_for_test <- "for_test"
+file_name_for_test <- "allocation_rule_for_test"
 dirpath_for_test <- system.file("extdata", package = "RLoptimal")
-filepath_for_test <- system.file("extdata/for_test", package = "RLoptimal")
+filepath_for_test <- system.file("extdata/allocation_rule_for_test", package = "RLoptimal")
 
 setup_python()