diff --git a/data-raw/AT/create_MortalityTables_Austria_Population.R b/data-raw/AT/create_MortalityTables_Austria_Population.R index 40a8bd9f45ff9b355bd27ad2b40604152fcf5495..ba7e20f1c2cb1337ffe7f923a473f70bf658bc0f 100644 --- a/data-raw/AT/create_MortalityTables_Austria_Population.R +++ b/data-raw/AT/create_MortalityTables_Austria_Population.R @@ -40,7 +40,8 @@ mort.AT.census = array( censtable = function(file, table, sheet, baseYear = 1900, sex = "m", skip = 5, n_max = 102) { - data = read_excel(file, sheet = sheet, skip = skip, n_max = n_max) + data = read_excel(file, sheet = sheet, skip = skip, n_max = n_max) %>% + filter(!is.na(x)) name = paste0("ÖVSt ", table, " ", dplyr::recode(sex, "m" = "M", "w" = "F", "u" = "U")) tbl = mortalityTable.period( name = name, diff --git a/data/mort.AT.MCMC.RData b/data/mort.AT.MCMC.RData index a47ee98d84e151f21901c00b25f4d800ce04f530..ed52aefe1ddbc7c27440f2fbd0c4485099eebfcf 100644 Binary files a/data/mort.AT.MCMC.RData and b/data/mort.AT.MCMC.RData differ diff --git a/data/mort.AT.census.RData b/data/mort.AT.census.RData index 87dd67bd05527b16b8e69f84350891a9b5ab5546..3759abc88be45a4d938b1a26012b30acb547817d 100644 Binary files a/data/mort.AT.census.RData and b/data/mort.AT.census.RData differ