The investment_annual_summary dataset provides a summary
of the dollars in millions provided to each region for each fiscal year,
from 2012 to 2018.
ggplot(investment_annual_summary, aes(x = fiscal_year, y = dollars_in_millions, color = region)) +
geom_line() +
labs(
title = "Investment Annual Summary",
x = "Fiscal Year",
y = "Dollars in Millions"
)
The 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. Projects that do not have an associated
investment amount are excluded from the plot.
country_investment_projects <- investment_services_projects %>%
filter(country == params$country)
ggplot(country_investment_projects, aes(x = date_disclosed, y = total_investment, color = status)) +
geom_point() +
labs(
title = "Investment Services Projects",
x = "Date Disclosed",
y = "Total IFC Investment in Dollars in Millions"
)
## Warning: Removed 1 rows containing missing values (`geom_point()`).
The investment_services_projects dataset was filtered
below to focus on information about each investment project from the
2017 fiscal year, and is referred to as
country_annual_investment_projects. Projects that do not
have an associated investment amount are excluded from the plot.
country_annual_investment_projects <- investment_services_projects %>%
filter(country == params$country,
date_disclosed >= params$year_start,
date_disclosed <= params$year_end)
ggplot(country_annual_investment_projects, aes(x = date_disclosed, y = total_investment, color = status)) +
geom_point() +
labs(
title = "Investment Services Projects",
x = "Date Disclosed",
y = "Total IFC Investment in Dollars in Millions"
)