r - パワーポイントで ReporteRs パッケージを使用して rChart をレンダリングする

Question

以下のコードで光沢のある R でチャートをレンダリングできます。

 output$example=renderChart2({
    p1 <- nPlot(mpg ~ wt, group = 'cyl', data = mtcars, type = 'multiBarChart')
    p1
    })

今、私はpptで同じことをしたい. ReporteRs パッケージを使用します。以下のコードを試しましたが、機能しません

library(ReporteRs)
doc =pptx( )
doc <- addSlide(doc, "Two Content")
plotFunc<- function(){ nPlot(mpg ~ wt, group = 'cyl', data = mtcars, type = 'multiBarChart')
} 
doc <- addPlot(doc, fun =print, x = plotFunc)
writeDoc(doc, "r-2.pptx" )

rCharts を ppt でレンダリングする方法を教えてください。