r - 多变量观察绘图工具提示

Question

我正在制作一张带有悬停工具提示的美国地图，我已经开始工作了。但是，对于我想在工具提示中显示的每个变量，我对每个状态都有多个观察结果，目前只显示每个状态的第一个观察结果。每个观察结果都是一个候选人在 1976 年总统选举中的表现，我希望悬停工具提示显示每个候选人在该州的表现，而不仅仅是该州列出的第一个候选人。

这是我目前正在使用的代码。

Candidate 表示候选人的姓名， state_share 和 round_share 分别表示候选人获得的州普选票和州选举人票的百分比。

library(plotly)
colorscale <- c("blue" , "purple" , "red")

l <- list(color = toRGB("white"), width = 2)
# specify some map projection/options
g <- list(
  scope = 'usa',
  projection = list(type = 'albers usa'),
  showlakes = FALSE
)

threshold10$hover <- with(threshold10, paste(state, "<br>" , canvec ,':', 
                                             state_share ,",","Electoral Votes", round_share ))
fig <- plot_geo(subset(threshold10, year == 1976), locationmode = 'USA-states') 

fig <- fig %>% 
  add_trace(
    z = ~evotes, text = ~ hover  , locations = ~state_po,
  color = ~state_share , colors = colorscale) %>% 
  layout(title = '1976 Electoral Vote Allocation <br> 10% State Threshold',
    geo = g)
fig

我还附上了数据集的图像和我的代码生成的地图。我感谢任何人提供的任何帮助。我对使用绘图和映射很陌生，所以如果这是一个简单的问题，对此感到抱歉。谢谢您的帮助。

数据框：

地图输出：

标签： rdplyrr-plotlyggplotly