ReporteRsでpptxにプロットを追加できません

Question

ReporteRを使用してRでパワーポイントを作成しようとしていますが、addplotを使用してプロットオブジェクトをpptxに挿入すると空のスライドが表示されます。私はリファレンスマニュアルにggplot2オブジェクトについて述べています：fun = printと余分なxはプロットオブジェクトを指定していますが、うまくいきません。おそらくプロットオブジェクトはReporteRsパッケージでサポートされていないでしょうか？

library(webshot) 
 
library(ReporteRs) 
 
library(magrittr) 
 
library(plotly) 
 
library(MASS) 
 
    
 
    
 
myplot=plot_ly(iris,x=~Species,y=~Sepal.Width,type='bar') %>% 
 
    layout(
 
    title = "Sepal width of each type", 
 
    yaxis2 = list(
 
     tickfont = list(color = "red"), 
 
     overlaying = "y", 
 
     side = "right", 
 
     title = ""), 
 
    xaxis = list(title="")) 
 

 
myggplot<-ggplot(iris,aes(x=Species,y=Sepal.Width))+geom_bar(stat="identity") 
 

 
pptx(title="title") %>% 
 
    addSlide(slide.layout = "Title and Content") %>% 
 
    addPlot(fun=print,x=myplot,vector.graphic=F) %>% 
 
    writeDoc(file = "SepalData.pptx")

x=myplotとx=myggplotは異なる結果を与える：

は、ここに私のコードです。

Answer 1

plotlyオブジェクトはhtmlwidgetsです。この形式はReporteRsではサポートされていません。