This project is part of the US State Department's initiative to develop a Data Dashboard for foreign service officers at Embassies around the world. This repository includes the code for the refugee tab, which uses various UNHCR refugee datasets to provide insights into global displacement trends, demographic details, and solutions for refugees. The complete dashboard can be accessed here.
- Installation and Setup
- Usage
- Data Sources
- Features and Code Snippets
- Final Code
- Contributors
- License
To get started with this project, follow these steps:
-
Clone the repository:
git clone git@github.com:Fazazhar/Diplomacy-Lab-Dashboard.git
-
Change into the project directory:
cd Diplomacy-Lab-Dashboard
-
Install the necessary packages:
install.packages(c("shiny", "shinyjs", "refugees", "ggplot2", "dplyr", "shinydashboard", "plotly", "tidyr", "scales"))
-
Run the Shiny app:
shiny::runApp()
The dashboard provides an interactive interface to explore various datasets related to refugees, asylum seekers, and internally displaced persons. Navigate through the different tabs to visualize data trends and demographic information.
The data utilized in this dashboard comes from multiple sources, including:
- Refugees R Package
- UNHCR Refugee Population Statistics Database
- Internal Displacement Monitoring Centre (IDMC)
- UNRWA
For detailed information about the data, refer to the project memo:
The Refugee Tab utilizes the Refugee Population Statistics Database published by the Office of The United Nations High Commissioner for Refugees (UNHCR). The data is maintained and updated annually and semi-annually by the Expert Group on Refugee and IDP Statistics (EGRIS) and the Inter-agency Group on Statelessness Estimation, both commissioned by the UN Statistical Commission (UNSC).
The Population Data tab displays the number of forcibly displaced and stateless people by year, including refugees and asylum seekers. Here is a code snippet used to generate the population data plot:
output$plot_population <- renderPlotly({
data <- filter_data()$population
plot_graph(data, "year", input$population_vars, "Population Data", "Year", "Number of People", input$population_vars)
})
The Asylum Applications tab shows the number of applications from those seeking asylum. Below is a snippet to generate the asylum applications plot:
output$plot_asylum_applications <- renderPlotly({
data <- filter_data()$asylum_applications
plot_graph(data, "year", input$asylum_applications_vars, "Asylum Applications Data", "Year", "Number of Applications", input$asylum_applications_vars)
})
The final code for this project can be found here.
This project is licensed under the MIT License - see the LICENSE file for details.