R/data_indonesia.R

In dhsage: Reproductive Age Female Data of Various Demographic Health Surveys

#' @export

indo_2017 <- c(rep(15, 1681), rep(16, 1690), rep(17, 1798), rep(18, 1415),
    rep(19, 1352), rep(20, 1397), rep(21, 1392), rep(22, 1382),
    rep(23, 1329), rep(24, 1330), rep(25, 1387), rep(26, 1325),
    rep(27, 1323), rep(28, 1393), rep(29, 1357), rep(30, 1339),
    rep(31, 1392), rep(32, 1479), rep(33, 1424), rep(34, 1556),
    rep(35, 1635), rep(36, 1458), rep(37, 1595), rep(38, 1478),
    rep(39, 1445), rep(40, 1382), rep(41, 1459), rep(42, 1476),
    rep(43, 1286), rep(44, 1407), rep(45, 1353), rep(46, 1161),
    rep(47, 1363), rep(48, 1252), rep(49, 1136))
		
#' @export

indo_2012 <- c(rep(15, 1487), rep(16, 1562), rep(17, 1497), rep(18, 1329),
    rep(19, 1332), rep(20, 1338), rep(21, 1314), rep(22, 1304),
    rep(23, 1319), rep(24, 1314), rep(25, 1353), rep(26, 1472),
    rep(27, 1447), rep(28, 1394), rep(29, 1494), rep(30, 1478),
    rep(31, 1403), rep(32, 1469), rep(33, 1349), rep(34, 1266),
    rep(35, 1338), rep(36, 1429), rep(37, 1371), rep(38, 1307),
    rep(39, 1335), rep(40, 1313), rep(41, 1138), rep(42, 1244),
    rep(43, 1186), rep(44, 1000), rep(45, 1062), rep(46, 1042),
    rep(47, 1028), rep(48, 1008), rep(49, 885))
		
		
#' @export	
indo_2007 <- c(rep(15, 39), rep(16, 72), rep(17, 166), rep(18, 265),
    rep(19, 372), rep(20, 659), rep(21, 690), rep(22, 836), rep(23,
        901), rep(24, 1070), rep(25, 1381), rep(26, 1106), rep(27,
        1311), rep(28, 1195), rep(29, 1177), rep(30, 1420), rep(31,
        1204), rep(32, 1285), rep(33, 1173), rep(34, 1235), rep(35,
        1444), rep(36, 1131), rep(37, 1243), rep(38, 1121), rep(39,
        959), rep(40, 1174), rep(41, 922), rep(42, 1057), rep(43,
        960), rep(44, 921), rep(45, 1106), rep(46, 753), rep(47,
        970), rep(48, 885), rep(49, 692))
		
		
#' @export	

indo_2002 <- c(rep(15, 26), rep(16, 62), rep(17, 142), rep(18, 303),
    rep(19, 391), rep(20, 741), rep(21, 600), rep(22, 1806),
    rep(23, 871), rep(24, 874), rep(25, 1240), rep(26, 971),
    rep(27, 1166), rep(28, 1099), rep(29, 1052), rep(30, 1400),
    rep(31, 972), rep(32, 1173), rep(33, 1050), rep(34, 934),
    rep(35, 1286), rep(36, 868), rep(37, 1065), rep(38, 1035),
    rep(39, 858), rep(40, 1221), rep(41, 693), rep(42, 1051),
    rep(43, 773), rep(44, 665), rep(45, 1032), rep(46, 677),
    rep(47, 740), rep(48, 919), rep(49, 727))
	
	
#' @export	
indo_1997 <- c(rep(15, 62), rep(16, 85), rep(17, 200), rep(18, 324),
    rep(19, 432), rep(20, 721), rep(21, 643), rep(22, 859), rep(23,
        914), rep(24, 904), rep(25, 1252), rep(26, 1038), rep(27,
        1215), rep(28, 1157), rep(29, 968), rep(30, 1275), rep(31,
        937), rep(32, 1185), rep(33, 954), rep(34, 1013), rep(35,
        1415), rep(36, 936), rep(37, 1120), rep(38, 935), rep(39,
        863), rep(40, 1071), rep(41, 709), rep(42, 833), rep(43,
        718), rep(44, 614), rep(45, 966), rep(46, 576), rep(47,
        700), rep(48, 711), rep(49, 505))
		
#' @export		
indo_1994 <- c(rep(15, 53), rep(16, 81), rep(17, 209), rep(18, 303),
    rep(19, 437), rep(20, 758), rep(21, 634), rep(22, 780), rep(23,
        802), rep(24, 920), rep(25, 1271), rep(26, 955), rep(27,
        1017), rep(28, 1161), rep(29, 1131), rep(30, 1464), rep(31,
        1039), rep(32, 1176), rep(33, 881), rep(34, 1058), rep(35,
        1414), rep(36, 981), rep(37, 939), rep(38, 902), rep(39,
        815), rep(40, 1126), rep(41, 698), rep(42, 782), rep(43,
        582), rep(44, 548), rep(45, 870), rep(46, 530), rep(47,
        550), rep(48, 731), rep(49, 570))
		
#' @export		
indo_1991 <- c(rep(15, 38), rep(16, 88), rep(17, 176), rep(18, 316),
    rep(19, 381), rep(20, 725), rep(21, 582), rep(22, 712), rep(23,
        665), rep(24, 677), rep(25, 1231), rep(26, 931), rep(27,
        932), rep(28, 966), rep(29, 816), rep(30, 1318), rep(31,
        849), rep(32, 868), rep(33, 716), rep(34, 648), rep(35,
        1198), rep(36, 739), rep(37, 683), rep(38, 717), rep(39,
        522), rep(40, 925), rep(41, 490), rep(42, 481), rep(43,
        465), rep(44, 277), rep(45, 818), rep(46, 468), rep(47,
        422), rep(48, 602), rep(49, 467))
		
#' @export		
indo_1987 <- c(rep(15, 27), rep(16, 51), rep(17, 92), rep(18, 188), rep(19,
    189), rep(20, 307), rep(21, 310), rep(22, 439), rep(23, 442),
    rep(24, 434), rep(25, 644), rep(26, 476), rep(27, 549), rep(28,
        456), rep(29, 440), rep(30, 588), rep(31, 399), rep(32,
        490), rep(33, 361), rep(34, 345), rep(35, 495), rep(36,
        317), rep(37, 342), rep(38, 285), rep(39, 273), rep(40,
        379), rep(41, 250), rep(42, 319), rep(43, 278), rep(44,
        242), rep(45, 422), rep(46, 225), rep(47, 330), rep(48,
        274), rep(49, 226))