Filtrování dat pro konkrétní rok
Teď, když máš data filtrovaná pro projekty v konkrétní zemi, můžeš výsledky dále zúžit a podívat se na všechny projekty z fiskálního roku 2018. Připomeň si, že fiskální rok začíná 1. července předchozího roku a končí 30. června sledovaného roku.
Toto cvičení je součástí kurzu
Reporting with R Markdown
Pokyny k cvičení
- Ve čtvrtém bloku kódu vytvoř proměnnou
brazil_investment_projects_2018tak, že z datinvestment_services_projectsvyfiltruje projekty v Brazílii, jejichždate_disclosedspadá do fiskálního roku 2018 – ten začíná 1. července 2017 a končí 30. června 2018. - Pojmenuj blok kódu
brazil-investment-projects-2018. - Na řádek
33přidej nadpis se třemi mřížkami pro sekciInvestment Projects in Brazil in 2018.
Interaktivní cvičení na vyzkoušení si v praxi
Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.
{"investment_report.Rmd":"---\ntitle: \"Investment Report\"\ndate: \"`r format(Sys.time(), '%d %B %Y')`\"\noutput: html_document\n---\n\n```{r data, include = FALSE}\nlibrary(readr)\nlibrary(dplyr)\n\ninvestment_annual_summary <- read_csv(\"https://assets.datacamp.com/production/repositories/5756/datasets/d0251f26117bbcf0ea96ac276555b9003f4f7372/investment_annual_summary.csv\")\ninvestment_services_projects <- read_csv(\"https://assets.datacamp.com/production/repositories/5756/datasets/bcb2e39ecbe521f4b414a21e35f7b8b5c50aec64/investment_services_projects.csv\")\n```\n\n\n## Datasets \n\n### Investment Annual Summary\n\nThe `investment_annual_summary` dataset provides a summary of the dollars in millions provided to each region for each fiscal year, from 2012 to 2018.\n```{r investment-annual-summary}\ninvestment_annual_summary\n```\n\n### Investment Projects in Brazil\n\nThe `investment_services_projects` dataset provides information about each investment project from 2012 to 2018. Information listed includes the project name, company name, sector, project status, and investment amounts.\n```{r brazil-investment-projects}\nbrazil_investment_projects <- investment_services_projects %>%\n filter(country == \"Brazil\") \n```\n\n\n\n```{r}\nbrazil_investment_projects_2018 <- investment_services_projects %>%\n filter(country == \"Brazil\",\n ___ >= ___,\n ___ <= ___) \n\nbrazil_investment_projects_2018\n```\n\n\n"}