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)

Bắt đầu với ví dụ R có thể tái hiện trong issue và so sánh cách ggplotly xử lý các layer geom_sf với aesthetic frame. Bản tái hiện trên StackOverflow là phần điều tra duy nhất được tham chiếu; được xem là hoàn thành khi các giá trị pop_est đang thay đổi của bản đồ được cập nhật một cách rõ ràng qua các frame animation 2010 và 2011.