Подсказка ggplotly реагирует беспорядочно - PullRequest
Новая
       8

Подсказка ggplotly реагирует беспорядочно

0 голосов
/ 01 апреля 2019

enter image description here

У меня есть этот ggplotly объект корта НБА, показывающий попытки полевого гола каждого игрока.Как вы можете видеть, когда я нахожусь над каждым регионом двора, я вижу, что подсказка ведет себя очень непредсказуемо.Я чувствую, что это так, потому что суд производится с geom_polygon и geom_path.Ниже приведен код:

Данные (gg_lineup_fga): http://www.filedropper.com/gglineupfga

rank_colors <- RColorBrewer::brewer.pal(5, "RdYlBu")

ggplot2::ggplot(data = gg_lineup_fga, ggplot2::aes(x=long, 
                                                                y=lat, 
                                                                group = group,
                                                                fill = rank,
                                                                text = paste0("FGA : ", round(fga, 2)))) +
  ggplot2::facet_grid(. ~ player) +
  ggplot2::geom_polygon()  +
  ggplot2::geom_path(color = "black")  +
  ggplot2::coord_equal() +
  ggplot2::scale_fill_manual(values = rank_colors,
                             limits = 1:5,
                             name = NULL) +
  ggplot2::theme(axis.line=ggplot2::element_blank(),
                 axis.text.x=ggplot2::element_blank(),
                 axis.text.y=ggplot2::element_blank(),
                 axis.ticks=ggplot2::element_blank(),
                 axis.title.x=ggplot2::element_blank(),
                 axis.title.y=ggplot2::element_blank(),
                 panel.background=ggplot2::element_blank(),
                 panel.border=ggplot2::element_blank(),
                 panel.grid.major=ggplot2::element_blank(),
                 panel.grid.minor=ggplot2::element_blank(),
                 strip.text = ggplot2::element_text(size = 16), 
                 strip.background = ggplot2::element_blank(),
                 legend.position = "none",
                 # legend.margin = ggplot2::margin(0.1, 0.1, 0.1, 0, "npc"),
                 plot.margin = ggplot2::unit(c(0, 0, 0, 0), "cm"),
                 panel.spacing.y = ggplot2::unit(0, "cm"),
                 text=element_text(size=16, family="Avenir"))

Чтобы решить эту проблему, я могу вынуть geom_path, но это сотрет черныйЛиния границы судебных районов.Мне было интересно, есть ли в plotly параметр, который не позволяет всплывающей подсказке взаимодействовать с geom_path (взаимодействует только с geom_polygon)

1 Ответ

0 голосов
/ 01 апреля 2019

Удалить geom_path и добавить цвет к geom_polygon, чтобы окрасить границы, т. Е. geom_polygon(color ='black')

...