我正在尝试绘制一个带有引导标记节点和用户定义/彩色提示标签的圆形系统发育树。我得到了引导结果和标签，可以正常工作，但不知何故，我无法在图形设备中完全绘制绘图。总是有一些标签（从圆形系统树的中心向外辐射）丢失了自己的部分。唯一的方法是将尖端标签尺寸设置得非常小。
距离矩阵和 bootstrap 所基于的 DNAbin 文件由 82 个微生物菌株数据 (812aa) 组成。提示标签根据单独的属性文件进行着色。
dna_b<-read.dna("filename.txt", format="fasta")
dist.b<-dist.dna(dna_b)
tree_b<-nj(dist.b)
bp_b<-boot.phylo(tree_b, dna_b, B=1000, function(xx) nj(dist.dna<xx)))
tree_b2<-apeBoot(tree_b, bp_b)
phylo_b<-ggtree(tree_b2, layout='circular', size=0.02, branch.length = "none")+geom_text2(aes(label=bootstrap), size = 2)+geom_tiplab(aes(angle=angle))
#I changed the tiplab to original so using user defined attribute data was not required (the next line).
#phylo_b<-phylo_b %<+% isolate_attr +geom_tiplab(aes(color=tr_level,angle=angle),size=1)
phylo_b+theme(legend.position = "right", legend.text = element_text(size=3))+guides(colour = guide_legend(override.aes = list(size=3)))
我尝试设置更大宽度和高度的新图形设备，但没有成功。调整边距也不起作用。通过将tiplab大小设置为小于0.05，我可以获得完整的图，但这确实不是最佳的。非常感谢这里的一些帮助。
会议信息：
R version 3.3.3 (2017-03-06)
Platform: x86_64-w64-mingw32/x64 (64-bit)
Running under: Windows >= 8 x64 (build 9200)
locale: …