Как задать тип и название шрифта в ReporteRs:: addPlot?

#r #fonts #reporters

#r #шрифты #reporters

Вопрос:

Приведенный ниже код создает график и внедряет его в документ Word с использованием замечательного пакета ReporteRs. Код выдает предупреждение:

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

Я не смог выяснить, как указать конкретный шрифт, например «Times New Roman». Спасибо!

 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")
  

Ответ №1:

Решение, предоставленное автором пакета в группе Google reporters-package:

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")