Trying all results
This commit is contained in:
parent
4605f0408d
commit
e5248f90f4
1 changed files with 8 additions and 6 deletions
|
|
@ -640,13 +640,15 @@ source("load_data.R")
|
||||||
|
|
||||||
# Estimation de tous les modèles
|
# Estimation de tous les modèles
|
||||||
# all_results <- fit_all_participants_all_models(data)
|
# all_results <- fit_all_participants_all_models(data)
|
||||||
fit_all_participants_all_models(data %>% filter(participant_id == "qfmtmjjy"))
|
# fit_all_participants_all_models(data %>% filter(participant_id == "qfmtmjjy"))
|
||||||
# Ou seulement certains modèles
|
# Ou seulement certains modèles
|
||||||
# all_results <- fit_all_participants_all_models(
|
all_results <- fit_all_participants_all_models(
|
||||||
# data,
|
data,
|
||||||
# models_to_fit = c("HOMOGENEOUS", "GAIN_LOSS", "REE_BIASED_SIMPLE",
|
models_to_fit = c(
|
||||||
# "REE_LEARNING_SIMPLE", "REE_LEARNING_BIASED_SIMPLE")
|
"HOMOGENEOUS", "GAIN_LOSS", "REE_BIASED_SIMPLE",
|
||||||
# )
|
"REE_LEARNING_SIMPLE", "REE_LEARNING_BIASED_SIMPLE"
|
||||||
|
)
|
||||||
|
)
|
||||||
|
|
||||||
# Comparaison
|
# Comparaison
|
||||||
# comparison <- compare_nested_models(all_results)
|
# comparison <- compare_nested_models(all_results)
|
||||||
|
|
|
||||||
Loading…
Add table
Reference in a new issue