From 376f09166651e02b15c342a9aa9cfd680232b8ab Mon Sep 17 00:00:00 2001 From: riccardobergamin Date: Thu, 9 Nov 2023 17:50:50 +0100 Subject: [PATCH] Update evodynamics.R --- R/evodynamics.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/evodynamics.R b/R/evodynamics.R index b6d6eaf..15001ec 100644 --- a/R/evodynamics.R +++ b/R/evodynamics.R @@ -891,7 +891,7 @@ model{ // Likelihood mutations m1 ~ poisson(n*mu*log(2)*length_genome*((t_driver1) + (1+s1)*(t_sp-t_driver1))); - m2 ~ poisson(n*mu*log(2)*length_genome*((t_driver2-t_sp) + (1+s2)*(t_mrca2-t_driver2))); + m2 ~ poisson(n*mu*log(2)*length_genome*((t_driver2-t_sp)*(1+s1) + (1+s2)*(t_mrca2-t_driver2))); // Likelihood branching process