将几个图从 R 导出到 ppt [英] Export several plots from R into ppt
本文介绍了将几个图从 R 导出到 ppt的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
我在这里找到了一个函数,可以为在 R 中创建的绘图创建带有幻灯片的 ppt.这是该函数的链接:R:将当前活动的 R 绘图导出到 Powerpoint/Word/LibreOffice 的功能
I found a function here to create a ppt with a slide for a plot created in R. Here is the link to that function: R: Function to export currently active R plot to Powerpoint/Word/LibreOffice
我希望我的程序添加多张幻灯片(每个幻灯片包含一个图).
I would like my program to add several slide (containing one plot each).
我目前使用:export2ppt(file="plot.pptx")
但我不知道如何在同一个文件中添加第二个图.
I currently use : export2ppt(file="plot.pptx")
But I can't figure out how I add a second plot to the same file .
推荐答案
试试看
library(ReporteRs)
doc =pptx( ) # create pptx
doc=addSlide(doc,"Title and Content") # add slide
doc<-addTitle(doc,"first") # add title
fun_1<-function(){
plot(mpg ~ wt, data = mtcars)
}
doc <- addPlot(doc, fun= fun_1,vector.graphic =FALSE ) # add plot
doc=addSlide(doc,"Title and Content") # add slide
doc<-addTitle(doc,"Second") # add title
fun_2<-function(){
plot(mpg ~ cyl, data = mtcars)
}
doc <- addPlot(doc, fun= fun_2,vector.graphic =FALSE ) # add plot
writeDoc(doc, "r-2.pptx" )
这篇关于将几个图从 R 导出到 ppt的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!
查看全文