ПочатиПочніть безкоштовно

Додаємо повзунок для часу

У попередньому уроці ви створили анімацію, що показує кількість запусків кожної держави за роками. Панель з повзунком є альтернативою такій анімації й дає вам повний контроль над тим, яку частину історії досліджувати. Наприклад, ви можете переглядати її від початку до кінця або зосередитися лише на 1960-х. У цій вправі ваше завдання — додати повзунок під лінійною діаграмою запусків за державами.

plotly, crosstalk, dplyr і набір даних state_launches уже завантажено для вас.

Ця вправа є частиною курсу

Середній рівень інтерактивної візуалізації даних з plotly в R

Переглянути курс

Інструкції до вправи

  • Обчисліть кількість запусків за state_code і launch_year та перетворіть це на об'єкт SharedData. Збережіть результат у shared_launches.
  • Використовуючи shared_launches, створіть лінійну діаграму, що відображає кількість запусків (n) для кожної держави з часом. Збережіть цю діаграму як launch_ts. Використайте колір, щоб показати state_code.
  • Розмістіть повзунок під діаграмою, щоб фільтрувати відображувані роки. Позначте цей повзунок як "Year".

Інтерактивна практична вправа

Спробуйте виконати цю вправу, доповнивши цей зразок коду.

# Create a SharedData object containing the number of launches by year and state
shared_launches <- state_launches %>%
  count(___, ___) %>%
  ___()

# Create a line chart displaying the launches by state
launch_ts <- ___ %>%
  ___(x = ___, y = ___, color = ___) %>%
  ___()  

# Add a slider below the chart to filter the years displayed
___(list(___,
    ___(id = "time", label = ___, 
        sharedData = ___, column = ___)
))
Редагувати та запускати код