R 软件包eoffice 连接R软件绘图和office的利器

R 软件包eoffice 连接R软件绘图和office的利器

eoffice软件包收录在CRAN平台 可以通过

install.packages("eoffice") 

来安装。 

软件包使用非常简单，只需要加载软件包

library(eoffice)

然后在你完成绘图之后通过topptx,todocx等命令就可以将图输出到ppt和word中

plot(mtcars$mpg, mtcars$disp, col = factor(mtcars$cyl), pch = 20)

topptx(filename ="mtcars.pptx")

然后打开mtcars.pptx 就会发现里面每个元素都可以随意更改，跟你用ppt做出来的图一模一样。

可以直接编辑更改颜色大小等等。 同时也支持ggplot2软件包的绘图。

ggplot(mtcars, aes(mpg, disp, color = factor(cyl))) + geom_point()

topptx(filename =  "mtcars.pptx")## or

 todocx(filename = "mtcars.docx")

支持多处方式输出图片

p <- ggplot(mtcars, aes(mpg, disp, color = factor(cyl))) + geom_point()

topptx(p, filename = "mtcars.pptx"), width = 6, height = 4)

也支持表格从ppt或者word的输出和读取

totable(head(mtcars), filename = "mtcars.pptx")

以及输出多种图片格式

tofigure(p, filename = "mtcars.pdf")

详情： https://cran.r-project.org/web/packages/eoffice/vignettes/eoffice.html