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
|
||||
# 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
|
||||
# all_results <- fit_all_participants_all_models(
|
||||
# data,
|
||||
# models_to_fit = c("HOMOGENEOUS", "GAIN_LOSS", "REE_BIASED_SIMPLE",
|
||||
# "REE_LEARNING_SIMPLE", "REE_LEARNING_BIASED_SIMPLE")
|
||||
# )
|
||||
all_results <- fit_all_participants_all_models(
|
||||
data,
|
||||
models_to_fit = c(
|
||||
"HOMOGENEOUS", "GAIN_LOSS", "REE_BIASED_SIMPLE",
|
||||
"REE_LEARNING_SIMPLE", "REE_LEARNING_BIASED_SIMPLE"
|
||||
)
|
||||
)
|
||||
|
||||
# Comparaison
|
||||
# comparison <- compare_nested_models(all_results)
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue