Añadir gráficos
En este ejercicio, vas a añadir contenido a uno de los gráficos de tu panel. De nuevo, asegúrate de expandir el visor HTML después de tejer (knit) tu panel para ver la página completa.
Este ejercicio forma parte del curso
Creación de paneles con flexdashboard
Instrucciones del ejercicio
- Mueve el chunk de R
plot1al gráfico superior de la segunda columna.
Ejercicio interactivo práctico
Prueba este ejercicio y completa el código de muestra.
{"my_document.Rmd":"---\ntitle: \"Bikeshare\"\noutput: \n flexdashboard::flex_dashboard\n---\n \n```{r setup, include=FALSE}\nlibrary(flexdashboard)\nlibrary(readr)\nlibrary(ggplot2)\nlibrary(dplyr)\nlibrary(lubridate)\n```\n\n```{r load_data, include = FALSE}\ntrips_df <- read_csv('https://assets.datacamp.com/production/course_5875/datasets/sanfran_bikeshare_joined_oneday.csv')\n```\n\n```{r plot1}\n\ntrips_df %>%\n mutate(Hour = hour(start_date)) %>%\n group_by(Hour) %>%\n summarize(`Trips Started` = n()) %>%\n ggplot(aes(x = Hour, y = `Trips Started`)) +\n theme_bw() +\n geom_bar(stat = 'identity')\n\n```\n\nColumn\n-----------------------------------------------------------------------\n \n### Chart A\n \n```{r}\n\n```\n\nColumn\n-----------------------------------------------------------------------\n \n### Chart B\n \n```{r}\n\n```\n\n### Chart C\n\n```{r}\n\n```\n\n\n"}