如何在ggtree中设置特定的提示标签颜色
how to set specific tip label color in ggtree
我知道我可以通过像这样对提示标签进行分组来设置提示颜色:
library(ggtree)
tree<-read.tree(text="(A,(B,C));"
dd <-data.frame(taxa=c("A","B","C"),place=c("s1","s1","s2"))
p<-ggtree(tree)
p<-p %<+% dd +geom_tiplab(aes(color=place))
p
以便根据位置组应用随机颜色集
但是我如何指定我自己的颜色呢? (例如我想要黑色的 s1 和红色的 s2)
您可以通过在树和树枝上使用groupOTU来设置提示颜色。
tree<-read.tree(text="(A,(B,C));")
branches <- list(A=1,B=2,C=3)
tree <- groupOTU(tree,branches)
p <- ggtree(tree) + geom_tiplab(aes(color=group))+
scale_color_manual(values=c(A = "#E7B800",B= "#FC4E07", C = "darkgreen"))
p
我知道我可以通过像这样对提示标签进行分组来设置提示颜色:
library(ggtree)
tree<-read.tree(text="(A,(B,C));"
dd <-data.frame(taxa=c("A","B","C"),place=c("s1","s1","s2"))
p<-ggtree(tree)
p<-p %<+% dd +geom_tiplab(aes(color=place))
p
以便根据位置组应用随机颜色集
但是我如何指定我自己的颜色呢? (例如我想要黑色的 s1 和红色的 s2)
您可以通过在树和树枝上使用groupOTU来设置提示颜色。
tree<-read.tree(text="(A,(B,C));")
branches <- list(A=1,B=2,C=3)
tree <- groupOTU(tree,branches)
p <- ggtree(tree) + geom_tiplab(aes(color=group))+
scale_color_manual(values=c(A = "#E7B800",B= "#FC4E07", C = "darkgreen"))
p