首先,最好将输出直接放入 PDF 文件 - 您可以使用其他图像格式,但 PDF 是最好的,因为它是矢量输出,您可以随意缩放:
pdf("Your-file.pdf", paper="a4", width=8, height=8)
那么最好使用pheatmap
(=漂亮的热图)包。除了热图之外,它还可以使用颜色键制作更好的热图。最后,尽管该pheatmap()
函数会在您有很多行时尝试减小标签大小,但是对于非常多的行它会失败。因此,我将下面的代码用于非常高但不太高的行数:
library(pheatmap)
library(gplots)
if (nrow(table) > 100) stop("Too many rows for heatmap, who can read?!")
fontsize_row = 10 - nrow(table) / 15
pheatmap(table, col=greenred(256), main="My Heatmap", cluster_cols=F,
fontsize_row=fontsize_row, border_color=NA)
您可以更改fontsize_col
列标签。您有许多有趣的选项,例如display_numbers
将值放在热图的单元格内。刚读?pheatmap
。
这是由命令的默认参数生成的示例pheatmap()
:
最后请注意,太多的行在显示器上很容易阅读,但对打印无用。