R树状图中的叶子之间的字体和间距更大 [英] larger font and spacing between leaves in R dendrogram

问题描述

我在 R 中有一个树状图，但我无法正确处理.

我会告诉你问题是什么，请检查这个: 包.

# install.packages("dendextend")图书馆(dendextend)dend <- as.dendrogram(hclust(dist(USArrests[1:5,])))# 喜欢:#dend <- USArrests[1:5,] %>% dist %>% hclust %>% as.dendrogram# 默认情况下，树突没有文本大小(仅显示第一片叶子)get_leaves_nodePar(dend)[[1]]par(mfrow = c(1,2), mar = c(10,4,4,2))情节(dend，主要=原始dend")# 让我们增加标签的大小:dend <- set(dend, "labels_cex", 2)# 现在每个州都有一个更大的标签get_leaves_nodePar(dend)[[1]]plot(dend, main = "更大的标签字体")

(注意改变标签间距目前没有实现)

关于包的更多细节，你可以看看在它的小插曲.

I have a dendrogram in R that I just can't get it right.

I'll show you what the problem is, please check this: http://img.photobucket.com/albums/v699/rica01/Rplot-1.png

How can I make the labels on the leaves, bigger and more spaced between them?

Thanks.

-Ricardo

解决方案

Solution: use the set function, with the "labels_cex" parameter from the dendextend package.

# install.packages("dendextend")
library(dendextend)

dend <- as.dendrogram(hclust(dist(USArrests[1:5,])))
# Like: 
# dend <- USArrests[1:5,] %>% dist %>% hclust %>% as.dendrogram

# By default, the dend has no text size to it (showing only the first leaf)
get_leaves_nodePar(dend)[[1]]
par(mfrow = c(1,2), mar = c(10,4,4,2))
plot(dend, main = "Original dend")

# let's increase the size of the labels:
dend <- set(dend, "labels_cex", 2)
# Now each state has a larger label
get_leaves_nodePar(dend)[[1]]
plot(dend, main = "A larger font for labels")

(note that changing the spacing between the labels is currently not implemented)

For more details on the package, you can have a look at its vignette.

这篇关于R树状图中的叶子之间的字体和间距更大的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！