我的目标是绘制一棵树并在树旁边的表格中添加一些注释。我想添加颜色和文本（给定的数据在数据框中）。
我能够绘制树和标签，但不知道如何添加表格。有解决办法吗？
这是我当前生成树的代码：
library("ggtree")
library("ggplot2")
library("phytools")
tree2<-read.newick(text="(A,((B,((C,D),E)),(F,G)));")
tree_fig <- ggtree(tree2, branch.length = "none") + geom_tiplab()
p <- plot(tree_fig)
我想大致实现以下图像（但标签和颜色对齐）
