R/data_hivpak.R

#' @import stats

data_malehiv<-c(13431,	13740,	14001,	14635,	15002,	15365,	15554,	15910,	16316,	15705,
     16043,	16370,	17966,	18332,	18665,	19153,	19651,	19980,	20411,	20904,
     21339,	21821,	22307,	23149,	23074,	23492,	24022,	24563,	25041,	24394,
     24959,	25387,	25949,	25332,	26050,	26683,	27125,	27731,	28409,	28738,
     29457,	30380,	30818,	31638,	32788,	33744,	34768,	33977,	34447,	35217,
     35671,	35020,	35128,	35305,	35402,	35527,	35557,	37318,	39548,	37964,
     38614,	39023,	39430,	39880,	40204,	40844,	41342,	41895,	42525,	43116,
     43606,	44192)


data_maleart<-c(7446,	7637,	7866,	8466,	8800,	9102,	9196,	9527,	9800,	9531,
     9787,	10086,	11162,	11459,	11692,	12291,	12661,	13047,	13522,	13933,
     14245,	14592,	14941,	15600,	15670,	16007,	16509,	17009,	17438,	17196,
     17680,	18141,	18617,	18959,	19689,	20378,	20936,	21524,	22185,	22319,
     23144,	23998,	24460,	25247,	26228,	27310,	28362,	27810,	28179,	29283,
     29725,	27767,	27874,	28035,	28027,	28139,	28177,	29598,	30827,	30716,
     30948,	31353,	31727,	32143,	32439,	33035,	33529,	34579,	35193,	36849,
     37350,	37840)


data_femalehiv<-c(2804,	2838,	2884,	2983,	3048,	3109,	3130,	3085,	3145,	3101,	3150,
             3188,	3500,	3557,	3548,	3691,	3781,	3839,	3905,	4021,	4119,	4209,
             4316,	4676,	4494,	4572,	4761,	4909,	5013,	4766,	4889,	4979,	5094,
             5126,	5292,	5400,	5546,	5605,	5756,	5869,	6146,	6410,	6450,	6646,
             7057,	7365,	7607,	7317,	7395,	7486,	7632,	7376,	7440,	7515,	7614,
             7664,	7657,	8174,	8400,	8281,	8460,	8540,	8657,	8810,	8910,	9050,
             9221,	9332,	9487,	9625,	9774,	9897)



data_femaleart<-c(1996,	2041,	2065,	2196,	2259,	2316,	2323,	2384,	2432,
     2373,	2408,	2446,	2681,	2730,	2724,	2896,	2946,	2989,
     3085,	3216,	3307,	3357,	3431,	3685,	3581,	3657,	3843,
     3922,	4022,	3906,	4014,	4099,	4209,	4279,	4453,	4613,
     4707,	4898,	5028,	5102,	5365,	5649,	5688,	5876,	6174,
     6504,	6815,	6596,	6655,	6874,	6992,	6744,	6810,	6884,
     6876,	6924,	6911,	7370,	7518,	7530,	7656,	7730,	7824,
     8003,	8096,	8231,	8398,	8559,	8699,	8894,	9040,	9158)



data_childrenhiv<-c(634,	647,		654,		685,		694,		703,		721,		732,		742,		770,		791,
     820,	829,		838,		848,		860,		842,		863,		824,		848,		854,		886,
     910,	947,		965,		986,		1096,	1154,	1187,	1132,	1150,	1176,	1204,
     1130,	1159,	1337,	1327,	1384,	1413,	1440,	1500,	1889,	1693,	2510,
     2947,	3236,	3433,	2935,	3060,	2991,	3028,	2792,	2818,	2878,	2965,
     2997,	3023,	3209,	3332,	3136,	3366,	3388,	3438,	3465,	3496,	3542,
     3582,	3621,	3673,	3566,	3623,	3668)


data_childrenart<-c(375,	389,	395,	418,	431,	438,	431,	445,	449,	466,	476,	495,	498,	505,	513,
     545,	557,	566,	553,	573,	582,	606,	633,	639,	654,	678,	783,	831,	867,	855,	877,
     898,	928,	911,	927,	1080,	1091,	1124,	1187,	1196,	1231,
     1551,	1413,	1866,	2495,	2801,	3074,	2596,	2598,
     2571,	2599,	2518,	2535,	2580,	2663,	2680,	2705,
     2755,	2869,	2835,	2912,	2939,	2978,	3019,	3049,
     3082,	3112,	3149,	3190,	3233,	3279,	3320)



data_tgenderhiv<-c(149,	157,	165,	168,	175,	180,	181,	186,	191,	151,	154,
     158,	217,	230,	237,	257,	263,	268,	276,	286,	299,	327,	340,
     341,	351,	379,	392,	409,	423,	415,	427,	443,	451,	438,	466,
     478,	508,	525,	558,	565,	590,	609,	620,	635,	664,	716,	742,
     710,	620,	737,	754,	765,	772,	786,	810,	810,	828,	894,	931,
     919,	940,	959,	973,	994,	996,	1014,	1038,	1070,
     1096,	1119,	1153,	1188)



data_tgenderart<-c(67,	73,	79,	91,	91,	96,	97,	99,	103,	79,	82,
     88,	120,	128,	130,	149,	157,	180,	172,	177,	183,	203,
     220,	219,	228,	238,	250,	257,	279,	282,	292,	304,	314,
     312,	338,	355,	372,	399,	433,	441,	468,	484,	490,	505,
     530,	587,	609,	588,	514,	620,	635,	633,	638,	650,	668,
     668,	685,	755,	779,	784,	804,	821,	831,	856,	859,	876,
     903,	943,	968,	996,	1028,	1067)


#' @export
malehiv <- stats::ts(data_malehiv, start=2016, frequency=12)

#' @export
maleart <- stats::ts(data_maleart, start=2016, frequency=12)

#' @export
femalehiv <- stats::ts(data_femalehiv, start=2016, frequency=12)

#' @export
femaleart <- stats::ts(data_femaleart, start=2016, frequency=12)

#' @export
childhiv <- stats::ts(data_childrenhiv, start=2016, frequency=12)

#' @export
childart <- stats::ts(data_childrenart, start=2016, frequency=12)

#' @export
tghiv <- stats::ts(data_tgenderhiv, start=2016, frequency=12)


#' @export
tgart <- stats::ts(data_tgenderart, start=2016, frequency=12)

Try the hivdata package in your browser

Any scripts or data that you put into this service are public.

hivdata documentation built on Oct. 10, 2023, 5:06 p.m.