Adding zooming option for wordcloud in Shiny (with reproducible example)

Hi Shiny Experts,

Could you please help me to add zooming option for wordcloud

Please find reproducible example @

I tried to incorporate rbokeh and plotly but couldnt find wordcloud equivalent render function
Additionally, I found ECharts from github @

But incorporating this ECharts are also not convenient for really zoom.

Thanks in advance,