HighcharterR, переменная от R DataFrame во всплывающей подсказке - PullRequest
0 голосов
/ 18 мая 2018

У меня есть data.frame, который создается с помощью следующего кода.Переменная «Kreationen» содержит ссылки на разные видео.

df <- rawdata %>%
    mutate(Euro = as.numeric(Euro)) %>%
    group_by(Firma, Marke, Kreationen, Mediengruppe) %>%
    summarize(Total = sum(Euro)) %>%
    select(Firma, Marke, Mediengruppe, Kreationen, Total) %>%
    head(5)

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

    highchart() %>%
        hc_chart(type = "column") %>%
        hc_add_series(data = df$Total) %>%
        hc_tooltip(formatter = JS(paste0('function() {var html = `<object width="1000" height="700" data="', df$Kreationen[1], '"></object>`; var x = document.getElementById("videos"); x.innerHTML = html}'))) 

Код работает абсолютно нормально для одного элемента data.frame, но я понятия не имею, как передать код динамически.Когда пользователь наводит курсор мыши на первую полосу, первое видео должно отображаться, когда он наводит курсор на второй строке, второе видео воспроизводится и т. Д.

...