r - Rの複数のqplotグラフで線の太さ/サイズを減らす

Question

高解像度の png で A4 ページに 24 のライン プロットを作成したいと考えています。gridExtra ライブラリの qplot と grid.arrange 関数を使用してこれを実行しようとしています。私の問題は、各プロットの線の太さを特定のしきい値以下に減らすことができないことです。size=0 または size=0.0001 などを設定しても違いはありません。超えられない最小値があるようで、私が望むよりもはるかに厚いです. プロット領域のサイズを大きくするとうまくいきますが、結果の画像を再スケーリングする必要があります。誰でも代替案を提案できますか? 最小限の例を以下に示します。

library(ggplot2)    
library(gplots)
library(gridExtra)

a <- c(0,1,2,3,4,5)
b <- a^2

plot1 <- qplot(a, b, geom = c("point", "line"), pch=10) + 
             geom_point(size=0) + 
             geom_line(size=0)
png("filename.png", width=15, height=22, units = "cm", res = 900)

grid.arrange(
plot1,plot1,plot1,plot1,
plot1,plot1,plot1,plot1,
plot1,plot1,plot1,plot1,
plot1,plot1,plot1,plot1,
plot1,plot1,plot1,plot1,
plot1,plot1,plot1,plot1,
ncol=4)

dev.off()