圆形系统发育名称削减

Question

我试图将系统发育放在复合 plot 的中间。 但是，我找不到合适的设置，因为顶部和底部的名称或左右两侧的名称都被剪切了。
我找到的唯一解决方案是减少 cex （分类名称的大小），但它看起来真的很傻，因为分类名称很小。

简单的可重现示例：

library(ape)
par(fig=c(0.25, 0.75, 0.25,0.75))
data(bird.orders)
plot(bird.orders, type = "fan", use.edge.length = T)

任何想法如何解决这个问题？ 与分类群名称相比，如果我可以缩小 plot 的分支长度部分，那将是理想的。

Answer 1

xpd图形参数允许文本到剪切区域之外的 plot。 尝试par(xpd = NA) ：

library(ape)
par(fig=c(0.25, 0.75, 0.25,0.75), xpd = NA)
data(bird.orders)
plot(bird.orders, type = "fan", use.edge.length = T)

您可以使用cex参数更改文本大小与边长的比率并扩大fig区域，因为您提到了您的问题。