Skip to content

Instantly share code, notes, and snippets.

@coleoguy
Created April 30, 2016 21:16
Show Gist options
  • Save coleoguy/f1a7d0e78dd8af23d6017aee113ef4e2 to your computer and use it in GitHub Desktop.
Save coleoguy/f1a7d0e78dd8af23d6017aee113ef4e2 to your computer and use it in GitHub Desktop.
library(phytools)
library(evobiR)
tree<-pbtree(n=500, scale=1)
tip.state.full <- SimThresh3(tree, liabilities=T)
ShowTree(tree, tip.state.full[[1]],
cols = c("red", "blue", "green"),
tip.cex=.5, type="fan")
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment