r - 将图像或pdf插入R中的word文档

标签 r for-loop imagemagick reporters

我正在使用一个循环创建许多表格等,并使用 ReporteRs 包将其导出到 word 文档中。因此,例如,我有一个包含许多页不同图形、表格和文本的 word 文档。

我想通过循环将图像(或 pdf - 两者都可以)插入其中(因为循环会生成许多不同的 word 文档)。我已经下载了 ImageMagick 和 magick 包来处理图像。现在我在 R 中有了我的图像,但我不知道如何将它添加到我的文档中。

我知道 ReporteRs 有一个插入外部图像的 addImage 命令(老实说,我很难弄清楚那个)。是否可以将内部图像/pdf 添加到文档中?

希望大家多多指教。先感谢您!

最佳答案

我强烈建议将您的代码迁移到 officer,因为 ReporteRs 将于 2018 年 7 月 16 日从 CRAN 中删除。从@d125q 写的代码来看,这将被转换为:

library(officer)
library(magick)

download.file("https://jeroen.github.io/images/frink.png", "frink.png")
dims1 <- attributes(png::readPNG("frink.png"))$dim/72
sample.image <- image_read("frink.png")
image_write(image_rotate(sample.image, 45), "frink_rotated.png")
dims2 <- attributes(png::readPNG("frink_rotated.png"))$dim/72


sample.doc <- read_docx()
sample.doc <- body_add_img(sample.doc, src = "frink.png", width = dims1[2], height = dims1[1] )
sample.doc <- body_add_img(sample.doc, src = "frink_rotated.png", width = dims2[2], height = dims2[1] )
print(sample.doc, target = "sample.docx")

关于r - 将图像或pdf插入R中的word文档,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/51172522/

相关文章:

javascript - 将数字添加到对象返回 NaN

r - 使用 R 循环遍历回归中的协变量

regex - 在 R 中计算 strsplit 的输出

r - 将预测添加到 Dygraph

python - 在列表中查找特定值的每三个实例

objective-c - 将 ImageMagick 库与 OS X 应用程序捆绑在一起?

pdf - 使用带有打印边距的 ImageMagick 在页面上平铺图像?

r - 将多组 jpg 图像组合成一个 jpg/png r

r - 使用黎曼和计算积分

r - 在ggplot2中的 map 上以一定半径绘制圆