Как мне уменьшить скорость воспроизведения анимированного сюжета? - PullRequest
Новая
       23

Как мне уменьшить скорость воспроизведения анимированного сюжета?

0 голосов
/ 04 ноября 2019

Мне нужно уменьшить скорость анимированной диаграммы рассеяния 

structure(list(Year = c(2008L, 2017L, 2016L, 2007L), Country = structure(c(2L, 
2L, 1L, 2L), .Label = c("China", "India", "Liberia", "New Zealand", 
"South Africa", "South Korea ", "Sudan", "UK, CIs & IOM(e)", 
"USA", "Zimbabwe"), class = "factor"), Migration_nos = c(59960L, 
55350L, 50020L, 49780L), Total_migration_nos = c(302140L, 255480L, 
279220L, 292560L), Rank = c(1L, 1L, 2L, 1L), Rankbubble = c(10L, 
10L, 9L, 10L)), row.names = c(NA, 4L), class = "data.frame")

p1 <- plot_ly(Australia, x = ~Migration_nos, y = ~Total_migration_nos, color = ~Country,
               size = ~Migration_nos, frame = ~Year, alpha = 1) %>% 

  add_trace(type = "scatter", mode = "markers") %>% 

  layout( title = "Overseas migration per country vs Total Overseas Migration",
    yaxis = list(zeroline = FALSE, title = "Total Migration numbers"),
         xaxis = list(zeroline = FALSE, title = "Migration Nos"))

p1

Скорость слишком высока в окне просмотра увеличителя

Также цвета выглядят слишком светлыми

Будет оценен некоторый код для изменения внешнего вида цветов (более жирный), а также для снижения скорости воспроизведения

...