Phylogenetics packages

# ── Phylogenetics packages ────────────────────────────────────
pkgs_phylo <- c("ape", "phytools", "picante", "castor",
                "geiger", "phylolm", "diversitree")

install_if_missing <- function(pkgs) {
  missing <- pkgs[!pkgs %in% rownames(installed.packages())]
  if (length(missing)) install.packages(missing)
  invisible(lapply(pkgs, library, character.only = TRUE))
}

install_if_missing(pkgs_phylo)