Urvalsstrategier

Interaktiv datavisualisering på mellannivå med plotly i R

Adam Loy

Statistician, Carleton College

Två urvalsstrategier

Transient selection

tidigare valda fall glöms bort

linking_teaser1.gif

Persistent selection

valda fall ackumuleras

linking_teaser2.gif

Interaktiv datavisualisering på mellannivå med plotly i R

Exempel

before_persistent_selection.png

Interaktiv datavisualisering på mellannivå med plotly i R

Skapa basdiagrammet

shared_data <- world2014 %>% SharedData$new()

p1 <- shared_data %>%
  plot_ly(x=~urban/population, y = ~co2, text = ~country) %>%
  add_markers()

p2 <- shared_data %>%
  plot_ly(x=~income, y = ~co2, text = ~country) %>%
  add_markers()

subplot(p1, p2, titleX = TRUE, shareY = TRUE) %>% 
  hide_legend()
Interaktiv datavisualisering på mellannivå med plotly i R

Persistent selection

Aktivera persistent selection med highlight()

subplot(p1, p2, titleX = TRUE, shareY = TRUE) %>% 
  hide_legend() %>%
  highlight(persistent = TRUE)

persistent_selection.gif

Interaktiv datavisualisering på mellannivå med plotly i R

Markering i färg

dynamic_selection.gif

Interaktiv datavisualisering på mellannivå med plotly i R

Markering i färg

Lägg till dynamic = TRUE för att aktivera en färgväljare

subplot(p1, p2, titleX = TRUE, shareY = TRUE) %>% 
  hide_legend() %>%
  highlight(persistent = TRUE, dynamic = TRUE)
Interaktiv datavisualisering på mellannivå med plotly i R

Två manipulationstyper

Direkt manipulation

urval görs genom interaktion med grafiska element

linking_teaser1.gif

Indirekt manipulation

urval görs via fråga utanför diagrammet

indirect_manipulation.gif

Interaktiv datavisualisering på mellannivå med plotly i R

select_time_series.gif

Interaktiv datavisualisering på mellannivå med plotly i R

Indirekt manipulation

world_indicators %>%
  SharedData$new(key = ~country) %>% 
  plot_ly(x = ~year, y = ~income, alpha = 0.5) %>%
  group_by(country) %>%
  add_lines()
Interaktiv datavisualisering på mellannivå med plotly i R

Indirekt manipulation

world_indicators %>%
  SharedData$new(key = ~country, group = "Select a country") %>% 
  plot_ly(x = ~year, y = ~income, alpha = 0.5) %>%
  group_by(country) %>%
  add_lines() %>%
  highlight(selectize = TRUE)
Interaktiv datavisualisering på mellannivå med plotly i R

indirect_manipulation.gif

Interaktiv datavisualisering på mellannivå med plotly i R

Nu kör vi en övning!

Interaktiv datavisualisering på mellannivå med plotly i R

Preparing Video For Download...