inst/charts/24.R

library(ComplexHeatmap)
library(cluster)

base <- scale(mtcars)

pa = pam(base, k = 3)

chart <- Heatmap(
  base,
  name = "mtcars",
  split = paste0("pam", pa$clustering),
  row_names_gp = gpar(fontsize = 7)
)
NicolasJBM/writer documentation built on Aug. 12, 2019, 2:36 p.m.