Loading required data for plot
# Load results from previous sections
mae <- get(load("mae.rda"))
Heatmap
Generate a heatmap of paired probes.
pair <- read.csv("result/getPair.hypo.pairs.significant.csv")
heatmapPairs(data = mae,
group.col = "definition",
group1 = "Primary solid Tumor",
annotation.col = c("years_smoked","gender"),
group2 = "Solid Tissue Normal",
pairs = pair,
filename = NULL)