Expand age groups population.
expand_age_pop.Rd
Expand age groups population.
Examples
ages <- c(
5053, 17743, 25541, 32509, 30530, 34806, 36846, 38691, 40056,
39252, 37349, 30507, 26363, 21684, 15362, 11725, 7461, 3260, 915)
expand_age_pop(ages)
#> x y
#> 1 0 5053
#> 2 1 4649
#> 3 2 4446
#> 4 3 4240
#> 5 4 4408
#> 6 5 4704
#> 7 6 4874
#> 8 7 5042
#> 9 8 5321
#> 10 9 5600
#> 11 10 6158
#> 12 11 6438
#> 13 12 6717
#> 14 13 6638
#> 15 14 6558
#> 16 15 6114
#> 17 16 6035
#> 18 17 5956
#> 19 18 6127
#> 20 19 6298
#> 21 20 6672
#> 22 21 6844
#> 23 22 7015
#> 24 23 7097
#> 25 24 7178
#> 26 25 7209
#> 27 26 7293
#> 28 27 7374
#> 29 28 7448
#> 30 29 7522
#> 31 30 7601
#> 32 31 7676
#> 33 32 7750
#> 34 33 7805
#> 35 34 7859
#> 36 35 7954
#> 37 36 8009
#> 38 37 8063
#> 39 38 8031
#> 40 39 7999
#> 41 40 7943
#> 42 41 7909
#> 43 42 7876
#> 44 43 7800
#> 45 44 7724
#> 46 45 7739
#> 47 46 7665
#> 48 47 7589
#> 49 48 7315
#> 50 49 7041
#> 51 50 6585
#> 52 51 6310
#> 53 52 6036
#> 54 53 5871
#> 55 54 5705
#> 56 55 5617
#> 57 56 5451
#> 58 57 5286
#> 59 58 5098
#> 60 59 4911
#> 61 60 4752
#> 62 61 4563
#> 63 62 4376
#> 64 63 4123
#> 65 64 3870
#> 66 65 3513
#> 67 66 3261
#> 68 67 3008
#> 69 68 2863
#> 70 69 2717
#> 71 70 2652
#> 72 71 2505
#> 73 72 2360
#> 74 73 2189
#> 75 74 2019
#> 76 75 1830
#> 77 76 1662
#> 78 77 1491
#> 79 78 1323
#> 80 79 1155
#> 81 80 921
#> 82 81 755
#> 83 82 587
#> 84 83 528
#> 85 84 469
#> 86 85 299
#> 87 86 242
#> 88 87 182
#> 89 88 123
#> 90 89 64
#> 91 90 5
#> 92 91 0
#> 93 92 0