2

我一直在用这个情节弄乱pinmaroma,但我无法弄清楚可以容纳使用下面的代码生成的情节的提示标签的神奇组合。任何建议将不胜感激。

library(ape)

archosaurs <- read.tree(text = "(Crocodilians,(Pterosaurs, Dinosaurs));")

par(pin=c(6, 4), mar=c(0, 4, 1, 2))
plot(archosaurs, type = "cladogram", edge.width = 3, cex=1.5,
direction="upwards", adj = 0.25, srt=-45)
4

1 回答 1

1

一种解决方案是调整绘图的 x 轴范围,例如:

plot(archosaurs, type = "cladogram", edge.width = 3, cex=1.5,
direction="upwards", adj = 0.25, srt=-45,x.lim=c(.5,3.5))

这将为您提供下图: 在此处输入图像描述

于 2015-10-22T08:20:36.557 回答