试图在PowerPoint模板上添加图时，R崩溃

Question

我已经使用R和库闪亮开发了一个仪表板，其中显示了一些不同的图表。这些不是静态图表，但根据您可以通过某些BOTTONS设置的某些过滤器进行动态生成。

。

下一步，我现在正在研究的是创建一个PowerPoint报告，包括我之前生成的那些图表。到目前为止，我得到了这件代码：

report <- pptx(template = 'report_template.pptx')
report <- addSlide(report,"report_layout") 
slide.layouts(report)
slide.layouts(report, "report_layout")
report <- addPlot(report, function() print(p))
writeDoc(report, "example_report.pptx")

作为platly创建的给定图表：

p <- plot_ly(agregado_cedex(), labels = ~Escalado, values = ~Total,type = "pie",
          text = ~Total, width = 500, height = 250, hoverinfo = "none") %>% config(displayModeBar = FALSE) %>%
layout(title = "Desglose incidencias", showlegend = TRUE,
       xaxis = list(showgrid = FALSE, zeroline = FALSE, showticklabels = FALSE),
       yaxis = list(showgrid = FALSE, zeroline = FALSE, showticklabels = FALSE))

此图表没有问题，因为它已正确显示在Shiny App(仪表板(上。

执行上面的代码时，我将在R Studio上获得下一个错误：

Warning: Error in .jcall: javax.xml.bind.UnmarshalException
 - with linked exception:
[org.xml.sax.SAXParseException: The markup in the document preceding the root element must be well-formed.]

我找到了类似的帖子，但是到目前为止尚未解决它在pptx中添加图，而无需使用addplot((

崩溃r。

有人知道怎么了吗？预先感谢！

Answer 1

ReporteRs不支持htmlwidgets。addPlot使用基本图命令，GGPLOT2，网格和格子。