Как уменьшить длину листьев для подгонки меток в дендрограмме R?

Question

Я создал кластер с hcluster, оригинальная дендограмма.

Для форматирования я использовал as.dendogram, Когда я сделал это, мои этикетки были вырезаны. вертикальная дендограмма

Еще больше благодаря горизонтальной ориентации. Тот, который мне нужен. горизонтальная дендограмма

Проблема не в том, чтобы швы были на полях, поскольку (для горизонтального) я использовал par(oma = c(0, 0, 0, 8) с не меткой эффекта. Это только уменьшило мои поля, но не оставило больше места для названий лейблов. Как я могу убедиться, что на графике отображаются все названия моделей?

Answer 1

Вы должны вероятно изменить mar и не oma в par():

mm <- matrix(rnorm(20), ncol = 4)
colnames(mm) <- c("leaf1", "leaf2", "leaf3", "very_long_leaf_realy")

# compare:
plot(as.dendrogram(hclust(dist(t(mm)))), horiz = TRUE)

# with:
oldpar <- par(mar = c(5, 4 ,4 , 8))
plot(as.dendrogram(hclust(dist(t(mm)))), horiz = TRUE)
par(oldpar) # restoring ploting parameters