Я пытаюсь синхронизировать все блоки slickR (в renderSlickR), но он синхронизирует только «дату» с «изображением» и «стрелкой», но не наоборот, как синхронизировать все slickR между собой? Может быть, добавить какие-то параметры в htmlwidgets :: JS?
И дополнительный аналогичный вопрос. Если у меня несколько slickROutput, как синхронизировать их между собой (все имеют одинаковую длину)?
opts <- settings(slidesToShow = 6, slidesToScroll = 1,
responsive = htmlwidgets::JS("[{breakpoint: 1200,settings: {slidesToShow: 6,slidesToScroll: 1}},
{breakpoint: 680,settings: {slidesToShow: 3,slidesToScroll: 1}]"))
image <- slickR(all_data$symbol, slideId = glue("{id}"), height = 70) + opts + settings(arrows = F)
value <- slickR(all_data$value,slideId = glue("{id}"), height = 30) + opts + settings(arrows = F)
date <- slickR(all_data$date,slideId = glue("{id}"),slideType = 'p') + opts + settings(arrows=T)
date %synch% (image %synch% arrow)