“文本”的标题奇怪地位于不同的y坐标,尽管它们的定义完全相同,但par
也相同。
此外,我希望legend
中的间距稍窄,cex
不会有任何帮助。
我可以以
样式添加一些空间(请参见代码中的MARK
),看起来有些好些,但不能固定间距:
有人知道如何处理(不带额外的包裹)吗?
legend
的输出应如下所示:
代码生成图
# pdf("test.pdf", width=8, height=4)
layout(matrix(c(1, 3, 2, 3), ncol=2), heights=c(4, 1.5))
par(mai=c(0, .5, .5, .25))
plot(1:10)
mtext(bquote(bold("Linear points")), 3, 0, cex=.9, adj=0, padj=-.3)
par(mai=c(0, .5, .5, .25))
curve(x^2)
mtext(bquote(bold("A curve")), 3, 0, cex=.9, adj=0, padj=-.3)
par(mai=c(0, 0, .375, 0))
plot.new()
legend("center", legend=c("The quick", "brown fox", "jumps over",
"the lazy dogs",
# expression(paste(" ", alpha~"=5%")), # MARK
expression(alpha~"=5%"),
"DF=Dgs. of freedom"),
lty=c(rep(1, 4), rep(NA, 2)), bg="white", col=1:4,
xpd=TRUE, pt.cex=1.1, horiz=TRUE, cex=.7)
# dev.off()