Animation of changing values of map over time using geom_sf and ggplotly does not work

This is a copy of my Question on StackOverflow.

I try to animate changing values on a map over time using ggplot with geom_sf and ggplotly. In the following example the map does not change over time.

library(sf)
library(tidyverse)
library(plotly)
library("rnaturalearth")
library("rnaturalearthdata")

world <- ne_countries(scale = "medium", returnclass = "sf")
world$year <- 2010

world2 <- world
world2$year <- 2011
world2$pop_est <- 1000000

world3 <- bind_rows(world, world2)

# ggplot(data = world) +
#   geom_sf(aes(fill = pop_est))

plt <- ggplot(world3, aes(fill = pop_est, frame = year)) +
  geom_sf() 

ggplotly(plt)

从 issue 中可复现的 R 示例开始，并比较 ggplotly 如何处理带有 frame aesthetic 的 geom_sf 图层。StackOverflow 复现是唯一被引用的调查；当地图中变化的 pop_est 值在 2010 和 2011 动画帧之间可见地更新时，即视为完成。