如何导出(到word或ppt)在R中生成的可编辑图形？

Question

我想将生成的图形(由ggplot2或任何其他包)保存到单词或ppt内的可编辑格式中。如何在R中做到这一点？我用过

install.packages("ReporteRs")
install.packages("export")

但是显示相同的消息。

Installing package into ‘C:/Users/ACER/Documents/R/win-library/3.6’
(as ‘lib’ is unspecified)
Warning in install.packages :
  package ‘ReporteRs’ is not available (for R version 3.6.1)


Installing package into ‘C:/Users/ACER/Documents/R/win-library/3.6’
(as ‘lib’ is unspecified)
Warning in install.packages :
  package ‘export’ is not available (for R version 3.6.1)

那么，是否有任何更新的/顺利的工作包？

Answer 1

根据ReporteRs文档，officer包已被重命名为officer。

安装..。

install.packages("officer") 

Answer 2

您还可以尝试eoffice包：

install.packages("eoffice")
ggplot(mtcars, aes(mpg, disp, color = factor(cyl))) + geom_point()
topptx(filename = file.path(tempdir(), "mtcars.pptx"))
## or todocx(filename = "mtcars.docx")
p <- ggplot(mtcars, aes(mpg, disp, color = factor(cyl))) + geom_point()
topptx(p, filename = file.path(tempdir(), "mtcars.pptx"), width = 6, height = 4)