ggraph绘制树状图时轴刻度标签异常问题求助

嘿，这个问题我之前折腾ggraph的时候也踩过坑！虽然ggraph是ggplot2的扩展，但它的轴系统和常规ggplot2逻辑不太一样——画树状图时，默认会用布局生成的内部位置编码（就是你看到的0、1、2这类数字）作为轴刻度，而不是直接映射你的数据标签。常规ggplot2的轴调整方法之所以没用，就是因为没适配ggraph的图数据结构逻辑。

下面分两种常见场景给你解决方案：

场景1：基于聚类树（dendrogram）绘图 #

如果你是用hclust生成聚类结果转成dendrogram后绘图，直接用ggraph自带的scale_x_dendrogram()就能解决问题，它会自动把树的叶子节点标签映射到x轴：

library(ggraph)
library(ggplot2)
library(stats)

# 生成示例聚类数据
data <- mtcars[, 1:4]
hc_result <- hclust(dist(data))
dend_obj <- as.dendrogram(hc_result)

# 正确绘制带标签轴的树状图
ggraph(dend_obj, layout = "dendrogram", circular = FALSE) +
  geom_edge_diagonal() + # 绘制树的边
  geom_node_label(aes(label = label), size = 3) + # 显示节点标签
  scale_x_dendrogram() + # 关键：将叶子节点标签设为x轴刻度
  theme_minimal() +
  theme(axis.text.x = element_text(angle = 45, hjust = 1)) # 可选：调整标签角度避免重叠

场景2：基于tbl_graph构建的树绘图 #

如果你是用tidygraph的tbl_graph对象构建树结构，需要手动将节点的x坐标位置和你的标签绑定，替换默认的数字刻度：

library(ggraph)
library(tidygraph)

# 构建带标签的树状图数据
tree_graph <- create_tree(10, children = 2, directed = FALSE) %>%
  activate(nodes) %>%
  mutate(node_label = paste0("Item_", 1:10)) # 自定义节点标签列

# 绘制带自定义轴标签的树状图
ggraph(tree_graph, layout = "dendrogram") +
  geom_edge_link() +
  geom_node_text(aes(label = node_label)) +
  scale_x_continuous(
    breaks = V(tree_graph)$x, # 用节点的布局x坐标作为刻度位置
    labels = V(tree_graph)$node_label # 替换成自定义标签
  ) +
  theme(axis.text.x = element_text(angle = 45, hjust = 1))

关键原因总结 #

常规ggplot2的轴调整是基于数据列的映射，但ggraph绘制树状图时，轴默认绑定的是布局算法生成的节点位置索引（数值型），而非你的原始数据标签。所以必须针对ggraph的布局结果，要么用专门的树状图刻度函数（如scale_x_dendrogram()），要么手动将刻度位置与标签做绑定。

内容的提问来源于stack exchange，提问作者JBGruber