如何從hclust樹狀圖中調整軸標簽的余量

Question

我有以下代碼：

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

產生以下情節：

如上圖所示。 我怎樣才能push他們的高度標簽push 得更進一步？

Answer 1

這可以用做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 ="")

Answer 2

解決方法可能是刪除ylab，只需將其作為文本添加到適當的坐標，如下所示：

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

Answer 3

也許使用mtext可能有所幫助

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

產生這個陰謀

side = 2定義左側，而line表示“偏心”。 您可以使用line和adj參數（以及更多）來執行更多操作：

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)

得出以下情節