R анимированный сюжет: линейный график не отображается

Question

Я пытаюсь построить этот код. Однако линия не появляется на графике. Пожалуйста, помогите мне, как решить проблему. введите описание изображения здесь

covid19x%>%
    filter(Entity %in% c("Iran", "Italy","Spain","China","Germany","France","United States"))%>%
  plot_ly(x = ~cases, y = ~deaths,color = ~Entity ) %>%
  group_by(Entity)%>%
  add_lines(frame=~Date)

Это формат данных:

       Entity Code       Date deaths Daily.new.confirmed.deaths..deaths. cases
1 Afghanistan  AFG 2019-12-31      0                                   0    NA
2 Afghanistan  AFG 2020-01-01      0                                   0    NA
3 Afghanistan  AFG 2020-01-02      0                                   0    NA
4 Afghanistan  AFG 2020-01-03      0                                   0    NA
5 Afghanistan  AFG 2020-01-04      0                                   0    NA
6 Afghanistan  AFG 2020-01-05      0                                   0    NA

Также я подготовил без проблем по маркерам:

covid19x%>%
    filter(Entity %in% c("Iran", "Italy","Spain","China","Germany","France","United States"))%>%
  plot_ly(x= ~ cases, y=~deaths,color  =~Entity)%>%
  add_markers(frame=~Date)