r - gganimate 创建重复图像

Question

我有一个如下所示的数据框:

head(newnolarank)

    lon      lat week b
1 -90.06445 29.97121    1 9
2 -90.06704 29.96944    1 9
3 -90.07495 29.96567    1 9
4 -90.07448 29.96621    1 9
5 -90.16480 29.91240    1 9
6 -90.04797 29.94557    1 9

我的 map 是通过 ggmap 中的 get_map 函数生成的

map <- get_map("New Orleans, LA", zoom=10, color="bw")

我使用geom_hex制作了十六进制 map

   p <- ggmap(map)+
coord_cartesian()+
stat_binhex(data=newnolarank,aes(x=lon, y=lat, alpha=0.5, frame = as.factor(b), cumulative = FALSE))+
scale_fill_continuous(low="#ACD9F4",high="#EC008C")+
theme(text=element_text(family="Avenir"), 
axis.line=element_blank(), 
axis.ticks = element_blank(), 
axis.text = element_blank(), 
plot.title=element_text(hjust=0.5),
 axis.title=element_blank())+
 ggtitle("Number of Sign Ups")

然后用gganimate制作一个gif。问题就在这里；即使将累积设置为 false，生成的 gif 似乎仍具有旧图像，这会产生重叠六角形或六角形显示在奇怪区域中的不良效果。

gganimate(p, "gif1.gif", title_frame = TRUE)

这是 GIF:

您还可以在图例中看到叠加层。

额外问题:如果有人可以帮助我摆脱出现的 alpha 的图例，那就太好了。

Answer 1

忘记在这里发布解决方案:事实证明数据集中有时间 NA，因此 gganimate 将它们添加到第一张图像和所有其他图像中。基本上这是一个功能而不是错误，从周列中删除 NA 解决了这个问题。