Bayesian decay model
Examples
mod <- bayesian_decay(alpha = 0.5, delta = 1, ch_dec = 1)
xsl_run(mod, get_example_ambiguous_condition())
#> $fits
#> $fits[[1]]
#> $fits[[1]]$sims
#> NULL
#>
#> $fits[[1]]$responses
#> [,1] [,2] [,3] [,4]
#> [1,] 0.4 0.4 0.4 0.4
#>
#> $fits[[1]]$perf
#> 1 2 3 4
#> 0.4 0.4 0.4 0.4
#>
#> $fits[[1]]$matrix
#> 1 2 3 4
#> 1 0.4 0.4 0.1 0.1
#> 2 0.4 0.4 0.1 0.1
#> 3 0.1 0.1 0.4 0.4
#> 4 0.1 0.1 0.4 0.4
#>
#> $fits[[1]]$sse
#> [1] 0.04
#>
#> $fits[[1]]$data
#> xslData object with label "example condition" and condition "ambiguous"
#> training trials: 2
#> test trials: 0
#> words: 4
#> objects: 4
#> accuracies: 4
#>
#>
#>
#> $sse
#> [1] 0.04
#>
#> $unweighted_sse
#> [1] 0.04
#>