R 不制作动画

我想用gganimate为我的价格数据制作一个历史图表，但输出只是RStudios查看器中的一个空绘图。如果我只是用ggplot2定期地绘制它，输出结果就会如预期的那样

价格数据是一个时间序列，但目标观测偶尔出现，因此我有一个目标“计数”。我想展示基于计数的动画，甚至索引都可以

库（ggplot2）
图书馆（dplyr）
图书馆（主题）
库（gganimate）
计数%readBin（整数（），10000000）
秒%readBin（整数（），长度（计数））
价格%readBin（双精度（），长度（计数））
df我看不出单个值的直方图有什么用处？你能做一个非动画的绘图来显示你的目标吗？请把你的数据作为文本而不是图片。请使用
dput（df）
使数据尽可能容易导入
library(ggplot2)
library(dplyr)
library(ggthemes)
library(gganimate)

count <- file('count.bin', 'rb') %>% readBin(integer(), 10000000)
seconds <- file('seconds.bin', 'rb') %>% readBin(integer(), length(count))
price <- file('price.bin', 'rb') %>% readBin(double(), length(count)) 

df <- data.frame(count, seconds, price)

ggplot(df, aes(x= price)) +
  geom_histogram(binwidth=10, fill = "#4271AE", colour = "#1F3552") +
  theme_fivethirtyeight() +
  theme(axis.title = element_text()) +
  transition_reveal(seq(1:length(count)))