Jump to content

File:Annotation legend param.png: Revision history

Diff selection: Mark the radio buttons of the revisions to compare and hit enter or the button at the bottom.
Legend: (cur) = difference with latest revision, (prev) = difference with preceding revision, m = minor edit.

22 December 2025

  • curprev 10:0810:08, 22 December 2025 Brb talk contribs 1,432 bytes +1,432 <syntaxhighlight lang='r'> library(RColorBrewer) library(ComplexHeatmap) set.seed(123) n <- 100 df <- data.frame( Subtype = sample(c("Hyperdiploid", "Ph-like", "DUX4", "Ph"), n, replace = TRUE), Sex = sample(c("Male", "Female"), n, replace = TRUE), Age_Group = sample(c("Childhood", "Adult"), n, replace = TRUE) ) # 1. Define distinct palettes # Subtype: Using "Set3" or "Paired" for many categories subtype_cols <- setNames( colorRampPalette(brewer.pal(12, "Paired"))(length(unique(df$S...