> library(phytools)
> source("xkcdTree.R")
> tree<-read.tree("anole.tre")
> xkcdTree(tree,"anoleTree.pdf",fsize=1.0,lwd=3, dim=c(5,13),waver=c(0.05,0.05),jitter=0.0005)
> source("xkcdTree.R")
> tree<-read.tree("anole.tre")
> xkcdTree(tree,"anoleTree.pdf",fsize=1.0,lwd=3, dim=c(5,13),waver=c(0.05,0.05),jitter=0.0005)
love it...
ReplyDeleteBrilliant idea, the only problem is that it isn't future proof in that the function points to a specific version of GhostScript in a specific place. I guess a fix might be to make the filepath to the GhostScript .exe file an option in the function.
ReplyDelete