如何在ReporteRs :: addPlot中設置字體類型和名稱？

Question

下面的代碼創建一個圖並使用美妙的ReporteRs包將其嵌入到Word文檔中。該代碼會生成警告：

"argument fontname is deprecated; please usefontname_serif, fontname_sans,fontname_mono,fontname_symbol instead" 

我一直無法弄清楚如何指定特定的字體，例如， 「英語字體格式一種」。謝謝！

library(ReporteRs) 
library(magrittr) 

x <- rnorm(100); y <- (1.5 * x) + rnorm(100, 0.1) 

options("ReporteRs-fontsize" = 12) 
doc <- docx() %>% 
    addPlot(function() plot(x,y, xlab = "Values of x", main="Test plot"), vector.graphic=TRUE, editable=TRUE, fontname="Times New Roman") 
writeDoc(doc, file = "test.docx") 

Answer 1

的溶液，通過包的作者在記者封裝谷歌組提供：

https://groups.google.com/forum/#!topic/reporters-package/x3a_qWQ0hGc

doc <- docx() %>% 
     addPlot(function() plot(x,y, xlab = "Values of x", main="Test plot", family="serif"), vector.graphic=TRUE, 
       editable=TRUE, fontname_serif = "Times New Roman") 
    writeDoc(doc, file = "test.docx")