Skip to contents

Step 4: rpl_e

YuKi

Source: vignettes/Step_4_rpl_e.Rmd
Step_4_rpl_e.Rmd

Step 4

Replay Recovery 

replay.recovery <- multiRL::rpl_e(
  result = recovery.MLE,

  data = data,
  behrule = behrule,
  colnames = colnames,
  
  models = list(multiRL::TD, multiRL::RSTD, multiRL::Utility),
  settings = list(name = c("TD", "RSTD", "Utility")),

  omit = c("data", "funcs")
)
  
save(replay.recovery, file = "./replay.recovery.Rdata")

plot(x = replay.recovery)

TD_alphaTD_beta

RSTD_alphaNRSTD_alphaPRSTD_beta

Utility_alphaUtility_betaUtility_gamma

Replay Fitting 

replay.fitting <- multiRL::rpl_e(
  result = fitting.MLE,

  data = data,
  behrule = behrule,
  colnames = colnames,
  
  models = list(multiRL::TD, multiRL::RSTD, multiRL::Utility),
  settings = list(name = c("TD", "RSTD", "Utility")),
  
  omit = c("funcs")
)

save(replay.fitting, file = "./replay.fitting.Rdata")

plot(x = replay.fitting)

Block_Ratio

Note

rpl_e includes a specialized argument called omit, which is used to remove specific slots from the returned results. Since the output is a complete multiRL.model (an S4 method object), it may contain data that lacks value for further analysis. Users can specify slot names in omit to reduce the memory footprint of the result.