R：当绘制为pdf时，方形绘图区域丢失

Question

之前肯定有人问过，但我找不到解决办法。我想用完美方块作为边界框绘制一些数据。使用par(pty="s")这很容易，但是一旦我将绘图保存为pdf文件，广场就会丢失。据我了解，这是因为pdf()使用paper="special"作为默认值，因此尊重width和height（由于我们有轴标签，因此不会给出完美的正方形）。但是指定其他paper选项没有帮助。

## the bounding rectangle in the following plot is a perfect square...
U <- matrix(runif(1000), ncol=2)
par(pty="s")
plot(U, type="p", xlab="U_1", ylab="U_2")

## ... however, not anymore if the plot is generated as a .pdf
pdf(file="U.pdf", width=6, height=6)
par(pty="s")
plot(U, type="p", xlab="U_1", ylab="U_2")
dev.off()