R 独特页面中的更多情节:标题隐藏
我试图在一页上绘制6x4个图形,每个图形都有标题。我用了很多选择R 独特页面中的更多情节:标题隐藏,r,plot,title,par,r-corrplot,R,Plot,Title,Par,R Corrplot,我试图在一页上绘制6x4个图形,每个图形都有标题。我用了很多选择 pdf("myDocument.pdf") #, width = 50, height =60) par(mfrow=c(6,4), oma = c(2,0,2,0) + 0.0) par(mar=c(2, 0, 1, 0) + 0.1) par(cex.axis=0.1) par( mgp = c(1, 1, 0), omd = c(1.0, 0, 1.0
pdf("myDocument.pdf") #, width = 50, height =60)
par(mfrow=c(6,4), oma = c(2,0,2,0) + 0.0)
par(mar=c(2, 0, 1, 0) + 0.1)
par(cex.axis=0.1)
par( mgp = c(1, 1, 0),
omd = c(1.0, 0, 1.0, 0),
pin=c(10,10),
plt = c(1,1,1,1),
usr =c(1,0,1,0)
)
for(z in 1:ncol(df_finale)){
...
corrplot(matriceTermine,
title = colnames(df_finale)[z],
xaxs = "i",
#insig = "pch",
#pch.col="blue",
#addrect=24, rect.lwd=10,
#addCoefasPercent=T,
method = "shade", # shade ellipse
order="original",
col=col1(11),
addgrid.col="grey",
addCoef.col="grey",
mar = c(0,0,0,0),
cl.cex= 0.2, cl.pos = "n", # 0.2
tl.pos = "n", tl.cex= 0.3, tl.offset = 0.9, tl.srt = 90,
#tl.pos="d")
}
dev.off()
结果是:
我必须修改哪些参数才能使标题可见?
假设我想缩小绘图的尺寸(给标题留出额外的空间),我该怎么做呢?我用这种方法解决了这个问题,添加了:
...
corrplot(matriceTermine,
#title = colnames(df_finale)[z],
...,
method = "s")
title(colnames(df_finale[z]), line = -0.1, cex = 2.5, font=3, cex.main = 2)
...
与
line=-q
可以“移动”q的标题
对于后续修改,我建议将绘图保存在“svg”中,并使用Inkscape对其进行修改。我以这种方式解决了问题,添加了:
...
corrplot(matriceTermine,
#title = colnames(df_finale)[z],
...,
method = "s")
title(colnames(df_finale[z]), line = -0.1, cex = 2.5, font=3, cex.main = 2)
...
与
line=-q
可以“移动”q的标题
对于后续修改,我建议将绘图保存在“svg”中,并使用Inkscape对其进行修改。您能否尝试
cex.main=2
?它只会使我的标题变为“粗体”,但它们仍然隐藏。我想有一种方法可以使图像变小,但是我怎么做呢?试着调整循环中的mar
参数我也试过了。最后,我用“行”解决了问题。你能试试cex.main=2
?它只是使我的标题变为“粗体”,但它们仍然隐藏着。我想有一种方法可以使图像变小,但是我怎么做呢?试着调整循环中的mar
参数我也试过了。最后,我用“线”解决了这个问题。请注意,出于再现性和自动化的原因,在R之外修改绘图通常是一个糟糕的做法。你完全正确,但有时需要“快速结果”。要做到这一点,必须始终直接在R中解决问题。请注意,出于再现性和自动化原因,在R之外修改绘图通常是一种糟糕的做法。您完全正确,但有时需要“快速结果”。要做到这一点,就必须在R中直接解决问题。