これは確かに以前に尋ねられましたが、解決策が見つかりません。境界ボックスとして完全な正方形を使用してデータをプロットしたいと思います。これpar(pty="s")は簡単ですが、プロットをpdfファイルとして保存すると、正方形が失われます。私が理解しているように、これは がデフォルトとしてpdf()使用paper="special"されているため、 and を尊重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()