TD: Model: TD

View source: R/model_TD.R

TDR Documentation

Model: TD

Description

V_{new} = V_{old} + \eta \cdot (R - V_{old})

Usage

TD(params)

Arguments

params

[vector]

algorithm packages accept only one argument

Value

loss [numeric]

algorithm packages accept only one return

Examples

## Not run: 
TD <- function(params) {
  res <- binaryRL::run_m(
    data = data,
    id = id,
    eta = c(params[1]),
    tau = c(params[2]),
    priors = priors,
    n_params = n_params,
    n_trials = n_trials,
    mode = mode,
    policy = policy
  )

  assign(x = "binaryRL.res", value = res, envir = binaryRL.env)
  loss <- switch(EXPR = estimate, "MLE" = -res$ll, "MAP" = -res$lpo)
  switch(EXPR = mode, "fit" = loss, "simulate" = res, "replay" = res)
}

## End(Not run)

binaryRL documentation built on Aug. 21, 2025, 6:01 p.m.