r - 如何获得 4 个不同的聚类相关热图以具有相同的顺序轴，以便将它们相互比较

Question

我已经为每组数据单独运行此代码，我有 44 个区域，需要将它们相互关联，但对于 4 个不同的治疗组，每个治疗组有 8-10 个单独的值。

`yh <- as.matrix(df_h[-1], header = T)`
`rownames(yh) <- df_h$``Animal ID`

`heatmaply_cor(
  cor(yh),
  cor.method = c("pearson"),
  xlab = FALSE,
  ylab = FALSE,
  k_col = 5,
  k_row = 5,
  showticklabels = c(FALSE, TRUE),
  symm = TRUE
) %>%
  layout(height = 925)`

但是，每次运行此程序时，每个热图沿轴具有不同的区域顺序，但我需要它们的顺序相同，以便我可以比较集群。有没有一种方法可以从一个数据集中完成所有 4 个相关热图，以便将所有 4 个相互显示？然后我不必分别做所有 4 组。