繁体   English   中英

如何从hclust树状图中调整轴标签的余量

[英]How to adjust margin for axis label from hclust dendogram plot

我有以下代码:

hc <- hclust(dist(USArrests), "ave")
plot(hc)
plot(hc, hang = 0.5, sub="", xlab ="")

产生以下情节:

在此输入图像描述

如上图所示。 我怎样才能push他们的高度标签push 得更进一步?

这可以用做mgp参数par

par(mgp=c(2, 1, 0))
plot(hc, hang = 0.5, sub="", xlab ="")

在此输入图像描述

par(mgp=c(1, 1, 0))
plot(hc, hang = 0.5, sub="", xlab ="")

在此输入图像描述

另外两个参数控制刻度线和刻度位置,例如:

par(mgp=c(2, 3, 2))
plot(hc, hang = 0.5, sub="", xlab ="")

在此输入图像描述

解决方法可能是删除ylab,只需将其作为文本添加到适当的坐标,如下所示:

plot(hc, hang = 0.5, sub="", xlab ="", ylab = "")
text(0, -50, "Height", srt = 90)

情节

也许使用mtext可能有所帮助

plot(hc, hang = 0.5, sub="", xlab ="", ylab = "")
mtext(text = "test", side = 2, line = 2)

产生这个阴谋

在此输入图像描述

side = 2定义左侧,而line表示“偏心”。 您可以使用lineadj参数(以及更多)来执行更多操作:

plot(hc, hang = 0.5, sub="", xlab ="", ylab = "")
mtext(text = "t2", side = 2, line = 2, col = "blue")
mtext(text = "t1", side = 2, line = 1, col = "blue")
mtext(text = "t0", side = 2, line = 0, col = "blue")
mtext(text = "tlow", side = 2, line = 0, col = "blue", adj = 0)

得出以下情节

在此输入图像描述

暂无
暂无

声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.

 
粤ICP备18138465号  © 2020-2024 STACKOOM.COM