Обновите значения таблицы фреймов данных, основываясь на графическом значении фрейма - PullRequest
2 голосов
/ 01 октября 2019

У меня есть график, показывающий столбцы time и amount кадра данных df.

df:

id   time                 amount    category
1    2018-03-22 15:22:00  78        g1        
2    2018-03-22 15:30:00  77        g1
...   
34   2018-03-23 01:00:00  82        k3 
...

График представляет собой анимацию, поэтому график отображается шаг за шагом, как в этом примере (https://plot.ly/r/cumulative-animations/#cumulative-lines-animation) в разделе Анимация накопленных линий . Я не могу опубликовать свою кодировку, но она выглядит примерно так.

Кодировка с сайта:

library(plotly)

accumulate_by <- function(dat, var) {
  var <- lazyeval::f_eval(var, dat)
  lvls <- plotly:::getLevels(var)
  dats <- lapply(seq_along(lvls), function(x) {
    cbind(dat[var %in% lvls[seq(1, x)], ], frame = lvls[[x]])
  })
  dplyr::bind_rows(dats)
}

d <- txhousing %>%
  filter(year > 2005, city %in% c("Abilene", "Bay Area")) %>%
  accumulate_by(~date)

p <- d %>%
  plot_ly(
    x = ~date, 
    y = ~median,
    split = ~city,
    frame = ~frame, 
    type = 'scatter',
    mode = 'lines', 
    line = list(simplyfy = F)
  ) %>% 
  layout(
    xaxis = list(
      title = "Date",
      zeroline = F
    ),
    yaxis = list(
      title = "Median",
      zeroline = F
    )
  ) %>% 
  animation_opts(
    frame = 100, 
    transition = 0, 
    redraw = FALSE
  ) %>%
  animation_slider(
    hide = T
    ) %>%
  animation_button(
    x = 1, xanchor = "right", y = 0, yanchor = "bottom"
  )

Мой сюжет: Plotly Animation

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

Желаемый вывод (на момент, показанный на графике выше):

id           34
amount       82
category     k3

Выход этой таблицы должен обновляться одновременно с графиком, всегда показывая значения текущего времени (значение ползунка), который является атрибутом frame функции plotly()

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

Есть идеи, как получить значение слайдера? Илиесть ли другой подход, где я могу подключить анимацию кстол для достижения моей цели?

...