pedigree_test/heatmap.R

library(gplots)
t <- read.table('output.txt', header = F, skip = 1)
rownames(t) <- t$V1
t <- t[, -1]
colnames(t) <- rownames(t)

heatmap(as.matrix(t), Rowv = NA, Colv = NA, col = colorpanel(100, 'blue', 'red'))
jngwehi/loxcodeR documentation built on March 17, 2020, 5:32 p.m.