ggtable绘制CAH聚类特征表时变量标签被截断的技术问询

针对变量标签显示截断的问题，可尝试以下几种实用解决方法：

• 给长标签自动换行
  使用stringr包的str_wrap函数将过长的变量名拆分成多行，避免横向截断。示例代码：

  library(GGally)
  library(stringr)
  
  ggtable(data1,
          columnsX = c("typo"),
          columnsY = str_wrap(names(data1)[1:17], width = 10), # 按指定宽度自动换行
          cells = "col.prop",
          fill = "std.resid",
          legend = 1) +
    theme(axis.text.y = element_text(hjust = 0)) # 左对齐标签，避免内容被隐藏
  

• 调整文本尺寸与边距
  通过修改主题参数缩小标签字体，或增加标签右侧边距，给长标签留出更多显示空间：

  library(GGally)
  
  ggtable(data1,
          columnsX = c("typo"),
          columnsY = names(data1)[1:17],
          cells = "col.prop",
          fill = "std.resid",
          legend = 1) +
    theme(
      axis.text.y = element_text(
        size = 8,       # 缩小字体大小
        margin = margin(r = 15) # 增加右侧边距
      )
    )
  

• 导出时指定足够的绘图宽度
  如果是导出图片时出现截断，可在ggsave中设置更大的宽度参数，确保所有标签完整显示：

  ggsave("cluster_feature_table.png", width = 12, height = 8, dpi = 300)
  

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