end_pause not working properly about gganimate

[thomasp85]

I am not able to replicate this in general and your code is not reproducible since data is not available to me. Can you please provide a reprex assuming the issue remains

[DOH-PXC5303]

Hi @thomasp85, I ran into a similar issue. Example below. I'm running ggplot2 v3.4.4 and gganimate v1.0.8. Ran into a S.O. thread that suggested 1.0.7 may not have the same issue but I have not tested that.

library(ggplot2)
library(gganimate)

df <- structure(
  list(Submitter = c("AAA", "BBB", "CCC", "DDD", "EEE", 
                     "AAA", "BBB", "CCC", "DDD", "EEE", "AAA", "BBB", "CCC", "DDD", 
                     "AAA", "BBB", "CCC", "DDD"), 
       Submission_Date = structure(c(19389, 
                                     19389, 19389, 19389, 19389, 19358, 19358, 19358, 19358, 19358, 
                                     19327, 19327, 19327, 19327, 19297, 19297, 19297, 19297), class = "Date"), 
       Cumulative_Count = c(275, 97, 23559, 3300, 878, 263, 97, 
                            23081, 3271, 0, 236, 97, 22727, 3212, 230, 97, 22288, 3206
       )), 
  row.names = c(NA, -18L), 
  class = c("tbl_df", "tbl", "data.frame"))

anim <- ggplot(df,
               aes(x = Submission_Date, y = Cumulative_Count, color=Submitter)) +
  geom_point() +
  geom_line()+
  transition_reveal(Submission_Date)

animate(anim,
        nframes = 120,
        end_pause = 100)
#> `geom_line()`: Each group consists of only one observation.
#> ℹ Do you need to adjust the group aesthetic?
#> `geom_line()`: Each group consists of only one observation.
#> ℹ Do you need to adjust the group aesthetic?

Edit: Ran using gganimate v1.0.7 and found a slightly altered output with lines and points. Output does not have the disappearing line at end pause issue.