将子图与R一起移动得更近

Question

我试图将子图与R一起移动。

我正在做的事情基本上不重要，但只是为了快速复制，这里是代码：

library(igraph)
library(plyr)

g<-graph.ring(10)
setEPS()
postscript( 'out.eps', horizontal=F, onefile=F, paper="special", fonts=c("serif", "Palatino"))

par( mfrow = c( 1, 5 ) )
for (i in 1:5){
  plot(g)
  title(main='title', cex.main=1.2)
}

dev.off() 

并作为输出我得到：

我知道我可以用2x3布局来组织它，而不是1x5，但这并不重要。 问题是，每个子图之间有很多自由空间，我想尽可能地放置它们。

有没有办法实现它？

P.S。 this question听起来很相似，但实际上并非如此。

Answer 1

你只需要添加：

par(mar = c(5,0,4,0))

调整每个情节的边距。还有另一种通过设置mai

来调整边距的方法

Answer 2

我通常使用omi（'c（bottom，left，top，right）'）和plt（'c（x1，x2，y1，y2）'）参数。 omi以英寸为单位调整外边距，plt将绘图区域的坐标作为图形区域的一部分。使用？par可以获得更详细的解释和更多参数。

par(mfrow = c(2,3), omi=c(0.5,0.3,0,0), plt=c(0.1,0.9,0,0.7))