R ggplot 图片保存为 pdf

问题:使用 latex 插入图片时,pdf 和 eps 格式图片效果较好,如果是R ggplot画图,保存成 pdf 最好;如果是 Matlab 画图建议保存成 eps 图片。但是 R 语言直接使用 export 保存 pdf 图像时屡屡出现问题,要么图像显示不全,要么直接没有显示。

方法:使用 ggplot 画图得到的图像命名为 pic_name, 之后使用 ggsave 保存。举例如下:

pic_name <- ggplot(data=Data3_P, aes(x=alpha, y=value, colour=variable)) + geom_line(size = 1.3,show.legend=FALSE)+
labs(x=expression(alpha),y="power",title="pic_name")+
theme(plot.title = element_text(hjust = 0.5))+
theme(title=element_text(size=11,color="black",face="bold",lineheight=0.2),
axis.title.x=element_text(size=11,face="bold",hjust=0.5),
axis.title.y=element_text(size=11,face="bold",hjust=0.5),
axis.text.x=element_text(family="RMN",size=11),
axis.text.y=element_text(family="RMN",size=11)) +
theme(axis.line = element_line(colour = "black"),
panel.grid.major = element_blank(),
panel.grid.minor = element_blank(),
panel.border = element_blank(),
panel.background = element_blank())+
scale_color_manual(name = element_blank(),values = c("#e50914","#ff9900","#221f1f",'#0080FF','#9F35FF'),labels = element_blank())+
theme(legend.position="top")

#============= save pdf ====================== ggsave(pic_name, file='pic_name.pdf', width=12, height=10) # 可以指定大小,如宽为12cm,高为10cm,需要指定保存路径

  

posted @ 2020-07-21 09:33  史迪仔_lmj  Views(11291)  Comments(0Edit  收藏  举报