v0.2.9

yuki-961004 · yuki-961004 · commit 2f0b8944d1b4 · 2026-02-14T23:02:32.000+08:00
变量名称写错了
diff --git a/R/estimate_2_ABC.R b/R/estimate_2_ABC.R
@@ -239,7 +239,7 @@ estimate_2_ABC <- function(
               control = control
             )
             
-            df_target <- .for_abc(
+            target <- .for_abc(
               data = sub_data, rsp = behrule$rsp,
               block = colnames$block, action = colnames$action
             )
diff --git a/R/tool_for_abc.R b/R/tool_for_abc.R
@@ -1,6 +1,4 @@
-.for_abc <- function(
-  data, rsp, block, action
-) {
+.for_abc <- function(data, rsp, block, action) {
   
   n_block <- length(unique(data[[block]]))
   n_rsp <- length(rsp)
diff --git a/docs/pkgdown.yml b/docs/pkgdown.yml
@@ -8,7 +8,7 @@ articles:
   Step_2_rcv_d: Step_2_rcv_d.html
   Step_3_fit_p: Step_3_fit_p.html
   Step_4_rpl_e: Step_4_rpl_e.html
-last_built: 2026-02-14T04:03Z
+last_built: 2026-02-14T15:00Z
 urls:
   reference: https://yuki-961004.github.io/multiRL/reference
   article: https://yuki-961004.github.io/multiRL/articles
diff --git a/src/multiRL.dll b/src/multiRL.dll

Original file line number	Diff line number	Diff line change
`@@ -239,7 +239,7 @@ estimate_2_ABC <- function(`
`239`	`239`	`control = control`
`240`	`240`	`)`
`241`	`241`
`242`		`- df_target <- .for_abc(`
	`242`	`+ target <- .for_abc(`
`243`	`243`	`data = sub_data, rsp = behrule$rsp,`
`244`	`244`	`block = colnames$block, action = colnames$action`
`245`	`245`	`)`