add "estimated" to fitMk

waldronlab · Oct 4, 2023 · 86b0ca5 · 86b0ca5
1 parent 4a78c3b
commit 86b0ca5
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/inst/scripts/phytools2.R b/inst/scripts/phytools2.R
@@ -107,7 +107,7 @@ input_matrix <- input_matrix[tree$tip.label,]
 ## ------------------------------------------------------------------------------------------------------------------------
 system.time({
     fit <- fitMk(
-        tree = tree, x = input_matrix, model = 'ER', pi = 'fitzjohn',
+        tree = tree, x = input_matrix, model = 'ER', pi = 'estimated',
         lik.func = 'pruning', logscale = TRUE
     )
 })