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()

但它的分辨率非常低。谷歌搜索后，我找到了可能的解决方案：

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中的高分辨率热图

2 个答案: