Test Seraphim Package
Tasks
task from "tasks"
where contains(file.name, "Test Seraphim Package")
setwd("C:/Users/ktmea/Projects/plague-phylogeography-projects/main/beast/all/chromosome/prune/filter5/")
getwd()
dir()
source("C:/Users/ktmea/Projects/plague-phylogeography/workflow/scripts/readAnnotatedNexus.r")
mcc_tree = readAnnotatedNexus("beast_mcc_hpd95.nex")
source("C:/Users/ktmea/Projects/plague-phylogeography/workflow/scripts/mccExtractions.r")
mcc_tab = mccExtractions(mcc_tree, 2019)
)