R将绘图对象转换为列表

Question

plotly_3.6.0具有功能plotly_build()，它将把plotly对象转换为类似于列表的'plotly_built'类。 更新到plotly_4.7.1之后，该函数似乎不再返回“ plotly_built”对象。

可以使用as_widget()将生成的对象转换回绘图对象，该对象可用于在闪亮的应用程序中进行渲染。

有什么方法可以将绘图对象转换为列表对象？

示例代码：

##generate graph and save in rdata file
library(plotly)
p <- economics %>% plot_ly(x = ~date, y = ~unemploy/pop) %>% add_lines()
pobj <- plotly_build(p)
##pobj must be of class plotly_built or list so that rdata saved file size is small and reads faster
class(pobj)
save(pobj,file = "plotlygraphs.rda")

##Load and plot graphs
x <- load("plotlygraphs.rda")
pgraph <- as_widget(pobj)