library(cleanETHPOP)
library(dplyr)
library(tidyr)
library(readr)
library(reshape2)
clean_births()
clean_deaths()
clean_pop()
There are 2 different scenario available:
where_data_Leeds1 <- system.file("extdata", "Leeds1", "InMigrants", package = "cleanETHPOP")
where_data_Leeds2 <- system.file("extdata", "Leeds2", "InMigrants", package = "cleanETHPOP")
clean_inmigrants(dir_path = where_data_Leeds1, save_name = "clean_inmigrants_Leeds1")
clean_inmigrants(dir_path = where_data_Leeds2, save_name = "clean_inmigrants_Leeds2")
where_data_Leeds1 <- system.file("extdata", "Leeds1", "OutMigrants", package = "cleanETHPOP")
where_data_Leeds2 <- system.file("extdata", "Leeds2", "OutMigrants", package = "cleanETHPOP")
clean_outmigrants(dir_path = where_data_Leeds1, save_name = "clean_outmigrants_Leeds1")
clean_outmigrants(dir_path = where_data_Leeds2, save_name = "clean_outmigrants_Leeds2")
outmigrants_per_capita()