# NOT RUN {
data("Caprimulgidae_ClaDS2")
# }
# NOT RUN {
MAPS = getMAPS_ClaDS(Caprimulgidae_ClaDS2$sampler, thin = 1)
print(paste0("sigma = ", MAPS[1], " ; alpha = ",
MAPS[2], " ; epsilon = ", MAPS[3], " ; l_0 = ", MAPS[4] ))
plot_ClaDS_phylo(Caprimulgidae_ClaDS2$tree, MAPS[-(1:4)])
# }
Run the code above in your browser using DataLab