使用PlotlyR创建交互式Choropleth贴图

问题描述

我第一次尝试创建交互式地图时已经在互联网上搜索了,但是碰到了墙。我绝不喜欢这种创建交互式地图的方式,因此,如果有人有任何其他尝试且真实的方法不使用绘图,那么我很想听听。

我正在尝试获取面板数据,并创建一个“热图”,以说明各县随时间的变化情况。对于可重现的示例,我已简化为3个县,3年和一个变量。我认为问题在于我要随时间更改的是多边形图层的填充。这段代码的结果很有趣,但显然不是我想要的。任何帮助,资源或指导将不胜感激。谢谢!

library(tidyverse)
wy<-map_data("state",region="wyoming")
county<- map_data("county",region = "wyoming")

#create reprex df
subregion <- rep(c("albany","big horn","converse"),each=3)

Year <- rep(c(2004,2005,2006),times =3)

Emp<- runif(9)

panel <- data.frame(subregion,Year,Emp)

#Combine this with map data
combined <- merge(panel,county,by= "subregion")

#Create map
x <-ggplot()+
  geom_polygon(data=wy,aes(x=long,y=lat,group=group),fill=NA,color="royalblue")+
  geom_polygon(data=county,color="dodgerblue1")+
  geom_polygon(data=combined,group=group,fill=Emp,frame = Year))+
  theme_void()

ggplotly(x)

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)