Script to make pheatmaps with metadata in R using presence/absence (or continuous) contingency tables