添加图表
在本练习中,您将为仪表板中的一张图表添加内容。 编译仪表板后,请再次展开 HTML 预览器,以便查看整页内容。
本练习是课程的一部分
使用 flexdashboard 构建仪表板
练习说明
- 将
plot1的 R 代码块移动到第二列顶部的图表中。
交互式实操练习
通过完成这段示例代码来试试这个练习。
{"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"}