Нужен ли Shiny-сервер для запуска HTMLWidget? - PullRequest
Новая
       82

Нужен ли Shiny-сервер для запуска HTMLWidget?

0 голосов
/ 10 февраля 2019

У меня есть блог, использующий Netlify.Итак, если я хочу встроить интерактивный элемент, я считаю, что мне нужно использовать iframe.

Интерактивный элемент, который я хочу использовать, представляет собой простую карусель изображений. 

library("slickR")

img <- c("img1.png",
         "img2.png", 
         "img3.png",
         "img4.png")

slickR(obj = img, slideId = 'ex1', height = 675, width = 540)

Чтобы создать отдельную страницу, которая просто содержит карусель изображений, мне нужно использовать глянцевый сервер для преобразованияR в CSS, HTML, Javascript?

Если так, вот моя попытка.Посоветуйте пожалуйста что не так. 

library(shiny)
library(htmlwidgets)
library(slickR)

ui = fluidPage(
  htmlwidgets::shinyWidgetOutput(outputId = , "carousel",
                                 name = "img_carousel",
                                 width = "550px", 
                                 height = "600px")
)

server = function(input, output) {
  img <- c("img1.png",
           "img2.png",
           "img3.png",
           "img4.png")

  slickR_obj <- slickR(obj = img, slideId = 'ex1', width = 540, height = 675)

  output$carousel <- htmlwidgets::shinyRenderWidget(slickR_obj)
}

shinyApp(ui = ui, server = server)

1 Ответ

0 голосов
/ 10 февраля 2019

Блестящий сервер требуется для блестящих приложений.То, что вы написали, блестящее приложение.Но вы можете легко преобразовать его в документ rmarkdown или flexdahsboard, который будет просто html и может отображаться где угодно.Если вы не знакомы ни с одним из них, они оба являются пакетами rstudio для создания HTML-отчетов в R.

...