Пакет Shiny Leaflet загружает интерактивную карту, но показывает только изменение круговых диаграмм на 1 точке данных из 5 и сбой - PullRequest
Новая
       11

Пакет Shiny Leaflet загружает интерактивную карту, но показывает только изменение круговых диаграмм на 1 точке данных из 5 и сбой

0 голосов
/ 24 мая 2019

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

Мы изучили код, и кажется, что это проблема с LeafletProxy, но мы не можем понять, почему он не работает, поскольку другие примеры с тем же кодом работают хорошо.

Это бит, который, похоже, не работает, код ошибки гласит, что он находится в разделе обозревателя и начинается со строки leafletProxy.

observe({
if (length(input$vesselsize) == 0) {
  data <- 1
} else {
  data <- fish_or_not[, input$vesselsize]
}

leafletProxy("map", session) %>%
  updateMinicharts(
    fish_or_not$Location,
    chartdata = data,
    maxValues = 1000,
    time = fish_or_not$MY,
    type = ifelse(length(input$vesselsize) < 2, "pie", input$type),
    showLabels = input$labels

На всех пяти портах Великобритании должно отображаться значение (после того, как будет установлено значение!) Количества дней, в течение которых лодки отправляются на рыбалку, и должно меняться со временем с помощью кнопки воспроизведения направо.Меняется только одна гавань, и мы не можем добавить несколько вариантов размеров судов без аварий.

enter image description here

...