r 中的高分辨率热图

Question

我使用了下面的 R 列表并得到了一个非常好的 heatmap:

png( "test-8.png", width =800 , height =750 )
heatmap(1-cor(df),distfun=function(x){as.dist(x)},symm=F,Rowv=NULL, Colv=NULL)
dev.off()

但它是用很低的分辨率制作的。 google 搜索后，我找到了可能的解决方案：

png( "test-8.png", width =800 , height =750,res=600 )
heatmap(1-cor(df),distfun=function(x){as.dist(x)},symm=F,Rowv=NULL, Colv=NULL)
dev.off()

不幸的是，我在代码执行后收到了错误消息：

Error in par(op) : invalid value specified for graphical parameter "pin"
Calls: heatmap -> par
Execution halted

我该如何管理它？任何建议将不胜感激。

Answer 1

您的设置可能会将 pin 大小减小到最小允许值以下（仍在寻找相关文档）。尝试使用以下内容。您可能需要加载 grid 包才能使 units 参数起作用。

png("high_res.png", width = 4, height = 4, units = 'in', res = 600)
heatmap(1-cor(df),distfun=function(x){as.dist(x)},symm=F,Rowv=NULL, Colv=NULL)
dev.off()

Answer 2

我遇到了同样的问题运行下面的代码，

par()

显示的项目很多。其中之一是 $pin，它有两个值。一个是消极的。我尝试了以下，

par(pin=c(0,0))

这似乎可以解决问题。我仍然不知道这是什么意思以及为什么会出现错误。

r 中的高分辨率热图

high resolution heatmap in r

r

heatmap