Memoles animasi

Visualisasi Data Interaktif Tingkat Menengah dengan plotly di R

Adam Loy

Statistician, Carleton College

Kustomisasi

Opsi animasi

Waktu antar frame
Transisi frame
Tampilan slider

Opsi plotting

Warna, bentuk, ukuran glyph
Label sumbu, transformasi
Tooltip (mis. teks hover)

Opsi animasi

Animasi dasar dengan setelan default.

ani <- world_indicators %>%
  plot_ly(x = ~income, y = ~co2) %>%
  add_markers(frame = ~year, 
              ids = ~country, 
              showlegend = FALSE) %>%
  layout(xaxis = list(type = "log"),
         yaxis = list(type = "log"))

Opsi animasi

Animasi dasar dengan setelan default.

ani %>%
  animation_opts(
      frame = 500, 
      transition = frame,
      easing = "linear",
      redraw = TRUE
   )

Mempercepat

Animasi sebar dipercepat menggunakan frame = 300.

ani %>%
  animation_opts(frame = 300)

Menjeda antar frame

Animasi dengan jeda 350 milidetik tiap frame.

ani %>%
  animation_opts(
     frame = 700, 
     transition = 350
  )

Titik memantul

Animasi dengan easing = "bounce".

ani %>%
  animation_opts(easing = "bounce")

Opsi easing dasar:

"linear", "quad", "cubic", "sin", "exp", "circle", "elastic", "back", "bounce"

Opsi slider

Animasi dasar dengan setelan default.

ani

Menghapus slider

Animasi tanpa slider.

ani %>%
  animation_slider(hide = TRUE)

Mengubah teks slider

Menghapus awalan "year: " dari slider.

ani %>%
  animation_slider(
     currentvalue = list(prefix=NULL)
  )

Mengubah teks slider

Membesarkan teks slider ke 40 dan mengubah warnanya menjadi hitam.

ani %>%
  animation_slider(
     currentvalue = list(prefix=NULL,
        font = list(
           color = "black", 
           size = 40
        )
     )
  )

Ayo berlatih!

Visualisasi Data Interaktif Tingkat Menengah dengan plotly di R