1
如何使用R图填充整个PowerPoint幻灯片?我想使用矢量图形(否则截图和裁剪将是一个解决方案)。我也想避免手动触摸。用R图填充整个PowerPoint幻灯片?
下面的代码(从this post获取)在填充“标题和内容”幻灯片的“内容”方面做得非常好。
library(ReporteRs)
require(ggplot2)
mydoc = pptx()
mydoc = addSlide(mydoc, slide.layout = "Title and Content")
mydoc = addTitle(mydoc, "Plot examples")
myplot = qplot(Sepal.Length, Petal.Length
, data = iris, color = Species
, size = Petal.Width, alpha = I(0.7)
)
mydoc = addPlot(mydoc, function() print(myplot), vector.graphic=TRUE)
writeDoc(mydoc, file = "test plot.pptx")
我想我也许可以使用下面的代码来填充整个幻灯片:
library(ReporteRs)
require(ggplot2)
mydoc = pptx()
mydoc = addSlide(mydoc, slide.layout = "Blank")
#mydoc = addTitle(mydoc, "Plot examples")
myplot = qplot(Sepal.Length, Petal.Length
, data = iris, color = Species
, size = Petal.Width, alpha = I(0.7)
)
mydoc = addPlot(mydoc, function() print(myplot), vector.graphic=TRUE)
writeDoc(mydoc, file = "test plot.pptx")
但是,我得到的错误信息:
Error in next_shape_pos(doc) :
shape of type 'plot' has no more room left to be displayed in the layout
我觉得有可能是一个解决方案,我创建新的PowerPoint幻灯片布局,内容填充整个幻灯片,然后保存为PowerPoint模板?但是我对这些东西并不是很熟悉,并开始觉得我失去了一些明显的东西。
飞驰完整的答案。有用! – lowndrul