diff --git a/DESCRIPTION b/DESCRIPTION index ee7976627fa54503f0d517c2203fe62fe2322524..41b02f88d23a7a855cddccc8c52d133602b9580e 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,6 +1,6 @@ Package: rsAnalysis Title: High-Level Tools for rsfMRI analysis -Version: 0.4.6 +Version: 0.4.7 Authors@R: person(given = "Christian", family = "Hohenfeld", diff --git a/R/compare_measure_group.R b/R/compare_measure_group.R index 2a23b3b4ee0bf86550b8e1f817d67fa5cf7ac6c3..9dd619238789b86372461fa53cd8a3b89cb830a9 100644 --- a/R/compare_measure_group.R +++ b/R/compare_measure_group.R @@ -46,8 +46,11 @@ compare_measure_group <- function(rawlist, dv, ..., add_name = FALSE, } bayes <- rstanarm::stan_glm(frml, data = grplist, iter = 2000, refresh = 0) + # explicitly use 0.1 * SD + abs_bound <- 0.1 * stats::sd(grplist[[dv]]) + use_rope_range <- c(-abs_bound, abs_bound) bayes_tbl <- parameters::model_parameters( - bayes, test = c("pd", "rope", "bf")) + bayes, test = c("pd", "rope", "bf"), rope_range = use_rope_range) list(lm = mod, lm_tbl = modtbl, anova = av, anova_tbl = tbl,