write.pml
writes out the ML tree and the model parameters.
Examples
data(woodmouse)
fit <- pml_bb(woodmouse, "JC", rearrangement = "none")
#> optimize edge weights: -1860.499 --> -1856.056
#> optimize edge weights: -1856.056 --> -1856.056
#> optimize edge weights: -1856.056 --> -1856.056
write.pml(fit, "woodmouse")
unlink(c("woodmouse.txt", "woodmouse_tree.nwk", "woodmouse_align.fasta"))