Mc

caravagnalab · Sep 13, 2024 · 0bc1c03 · 0bc1c03
1 parent 63eea3a
commit 0bc1c03
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 3 deletions.
diff --git a/R/utils_plots.R b/R/utils_plots.R
@@ -14,7 +14,8 @@ get_group_colors <- function() {
     "darkgreen",
     "firebrick3",
     "turquoise4",
-    "goldenrod3"
+    "goldenrod3",
+    "mediumpurple"
   )
   color
 }

diff --git a/inst/cmdstan/two_population.stan b/inst/cmdstan/two_population.stan
@@ -34,11 +34,11 @@ model {
   }
 
   // Priors
+  // n0 ~ normal(N[1], 0.1 * N[1]);
   rho_r ~ normal(0, 1);       // Prior for rho_r
   rho_s ~ normal(0, 1);       // Prior for rho_s
   t0_r ~ normal(0, 1);         // Prior for t_r
-  f_s ~ uniform(0,1);         // Prior for f_s
-
+  f_s ~ beta(2,2);         // Prior for f_s
 
   // Likelihood (assuming normallN distributed noise)
   N ~ poisson(mu);