returning html instead of widget

[yonicd]

returning html instead of widget

[yonicd]

nm got it.

library(leaflet)
library(widgetframe)
library(slickR)

l <- leaflet() %>% addTiles()
htmlwidgets::saveWidget(frameableWidget(l),'leaflet.html')

slickR(rep(paste0(readLines('leaflet.html'),collapse='\n'),4),slideType = rep('iframe',2),slickOpts = list(dots=T,slidesToShow=2,slidesToScroll=2))

[bhaskarvk]

Yup I was going to suggest the same for you. Cool that you got it on your own.
Btw if slickR is already taking care of adding the <iframe> HTML element, you may not need widgetframe after all.
You can simply do

library(leaflet)
library(widgetframe)
library(slickR)

l <- leaflet() %>% addTiles()
htmlwidgets::saveWidget(l,'leaflet.html')

slickR(rep(paste0(readLines('leaflet.html'),collapse='\n'),4),slideType = rep('iframe',2),slickOpts = list(dots=T,slidesToShow=2,slidesToScroll=2))

The only thing frameableWidget does is add the pym.js child initialization code, which you may not need if slickR is not using pym.js.

[yonicd]

you are right. thanks!

[bhaskarvk]

Btw if you do end up using widgetframe, do setup Pym.js and Parent in the parent widget, it will give you responsive iframes, which are really nice.

[yonicd]

responsive in what way? resizing?

kent russell just fixed my js code to get slick to run in rmarkdown. so now it works in rmarkdown and shiny.

[yonicd]

hey.

this doesnt give a reactive html anymore

library(leaflet)
library(dplyr)
l <- leaflet() %>% addTiles()
htmlwidgets::saveWidget(l,'leaflet.html')

what could be the reason?