R语言ggplot2实现将多个照片拼接到一起

本文主要介绍了R语言ggplot2实现将多个照片拼接到一起,文中通过示例代码介绍的非常详细,需要的朋友们下面随着小编来一起学习学习吧

将多个照片拼接到一起,然而电脑上没有安装ps 和 ai (拼图我暂时只想到这两个软件了)

直接使用R语言吧

思路是读取图片

使用ggplot2 显示

最后使用patchwork 拼接

代码

 library(ggplot2) library(jpeg) library(ggpubr) library(patchwork) img0<-readJPEG("308/0.JPG") p0<-ggplot()+ background_image(img0)+ theme_void() img1<-readJPEG("308/1.JPG") p1<-ggplot()+ background_image(img1)+ theme_void() img2<-readJPEG("308/2.JPG") p2<-ggplot()+ background_image(img2)+ theme_void() img3<-readJPEG("308/3.JPG") p3<-ggplot()+ background_image(img3)+ theme_void() img4<-readJPEG("308/4.JPG") p4<-ggplot()+ background_image(img4)+ theme_void() p1234<-p1+p2+p3+p4+plot_layout(ncol = 4) img5<-readJPEG("308/5.JPG") p5<-ggplot()+ background_image(img5)+ theme_void() img6<-readJPEG("308/6.JPG") p6<-ggplot()+ background_image(img6)+ theme_void() img7<-readJPEG("308/7.JPG") p7<-ggplot()+ background_image(img7)+ theme_void() img8<-readJPEG("308/8.JPG") p8<-ggplot()+ background_image(img8)+ theme_void() p5678<-p5+p6+p7+p8+plot_layout(ncol=4) p_final<-p0+p1234+p5678+plot_layout(ncol=1,nrow=3, heights  = c(3,1,1)) ggsave(filename="p-2.jpeg", p_final, width=12, heigh=15, dpi = 1000)

以上就是R语言ggplot2实现将多个照片拼接到一起的详细内容,更多请关注0133技术站其它相关文章!

赞(0) 打赏
未经允许不得转载:0133技术站首页 » R语言