officer是一个生成（处理）Word（docx）和PowerPoint（pptx）的R包。与ReportRs包相比速度要更快，依赖包也更少（好像也是这个作者写的，但是ReportRs要依赖于rjava，不便维护），常结合flextable包（生成表格），mschart包（生成office图表），rvg（结合ggplot2生成动态图表）。
word文档主要函数分类
1.添加内容作为段落：图像，表格，文字。使用body_add_*功能
- body_add_par 添加段落
- body_add_img 添加图片
- body_add_table 表格
- body_add_break 换行
- body_add_toc 目录
- body_add_gg ggplot图片
2.在现有段落内添加文字或图像。内容被添加到光标所在的段落中，使用slip_in_*功能： - slip_in_img()
- slip_in_seqfield()
-
slip_in_text()
3.移动光标 - cursor_begin()
- cursor_end()
- cursor_reach()
- cursor_backward()
- cursor_forward()
-
cursor_bookmark()
4.删除内容 - body_remove()
5.搜索和替换 - body_replace_text_at_bkm()
- body_replace_all_text()
示例
library(officer)
library(magrittr) # Package `magrittr` makes officer usage easier.
library(ggplot2)
my_doc <- read_docx() #初始化一个docx , 里面不填路径使用默认模板
styles_info(my_doc) #显示信息
gg <- ggplot(data = iris, aes(Sepal.Length, Petal.Length)) +
geom_point()
my_doc %>% #可以使用magrittr方式一步步添加
body_add_par(value = "Table of content", style = "heading 1") %>%
body_add_toc(level = 2) %>%
body_add_break() %>%
body_add_par(value = "dataset iris", style = "heading 2") %>%
body_add_table(value = head(iris), style = "table_template" ) %>%
body_add_par(value = "plot examples", style = "heading 1") %>%
body_add_gg(value = gg, style = "centered" ) %>%
print(target = "body_add_demo.docx")
输出结果
相关网站
- officer 生成 docx pptx
- https://davidgohel.github.io/officer/
- https://github.com/davidgohel/officer
- flextable 处理表格
- https://davidgohel.github.io/flextable/
- https://github.com/davidgohel/flextable
