ggplot与ggplot2:pdf显示速度很慢

我用这种命令制作一个pdf图:

ggplot(df, aes(sample = x))+ 
        stat_qq(geom="point",distribution=qexp)+
        geom_abline(intercept = 0, slope = 1,linetype='dashed',col='red')

ggsave(file="xxx.pdf")

比我想将pdf集成到tex文件中并生成最终的pdf文档.但是,ggplot显示速度非常慢,并且使pdf经常崩溃.当我使用geom='line'它时不会发生,所以我猜它来自圆点的数量.你对如何解决这个问题有任何想法吗？我真的更喜欢这个geom='point'选择.