Añadir un control deslizante para el tiempo
En la lección anterior, creaste una animación que mostraba el número de lanzamientos por estado a lo largo de los años. Una barra deslizante es una alternativa a esa animación que te da control total sobre qué parte de la historia analizar. Por ejemplo, puedes verla de principio a fin o centrarte solo en la década de 1960. En este ejercicio, tu tarea es añadir una barra deslizante debajo del gráfico de líneas de lanzamientos por estado.
Se han cargado por ti plotly, crosstalk, dplyr y el conjunto de datos state_launches.
Este ejercicio forma parte del curso
Visualización de datos interactiva intermedia con plotly en R
Instrucciones del ejercicio
- Calcula el número de lanzamientos por
state_codeylaunch_year, y conviértelo en un objetoSharedData. Guarda el resultado enshared_launches. - Usando
shared_launches, crea un gráfico de líneas que muestre el número de lanzamientos (n) de cada estado a lo largo del tiempo. Guarda este gráfico comolaunch_ts. Usa el color para representarstate_code. - Coloca un control deslizante debajo del gráfico para filtrar los años mostrados. Ponle la etiqueta
"Year".
Ejercicio interactivo práctico
Prueba este ejercicio y completa el código de muestra.
# 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 = ___)
))