In [1]:
data <- read.table("../Data/RCTs_and_Patients_Nb_local_prop_median_UI_per_region_and_disease.txt")
In [2]:
head(data)
Region Disease Nb_RCTs_low Nb_RCTs_med Nb_RCTs_up Nb_Patients_low Nb_Patients_med Nb_Patients_up Prop_RCTs_low Prop_RCTs_med Prop_RCTs_up Prop_Patients_low Prop_Patients_med Prop_Patients_up
1 Central Europe, Eastern Europe, and Central Asia Tuberculosis 4 17 28 817.791035280509 3727.45887445887 8286.37821455813 0.0670184629223417 0.279881461969048 0.465039030061452 0.0541345253732852 0.246996228187276 0.548102268596756
2 High-income Tuberculosis 28 95 186 4760.52142857143 20935.8779220779 80181.1191734 0.0445697341004633 0.152 0.298837432345686 0.0246145116753808 0.106212756460855 0.408072232458222
3 Latin America and Caribbean Tuberculosis 8 29 42 2031.4689484127 41578.255952381 46855.1901044703 0.185393444249661 0.67421141343607 0.985567832207902 0.25044366594425 4.89484230548107 5.74768206602598
4 North Africa and Middle East Tuberculosis 4 17 31 426.4375 2930.46428571429 4985.14201868919 0.050657984871941 0.214646464646465 0.393272107025709 0.0509666269158626 0.351318357907269 0.598363560953588
5 South Asia Tuberculosis 11 40 56 3184.94642857143 14501.0103479853 23036.5803571428 0.24519372262736 0.883197173769044 1.26012776852171 0.171534792285204 0.781339017910559 1.28564993265724
6 Southeast Asia, East Asia and Oceania Tuberculosis 15 53 76 5566.83035714286 28046.521031746 41850.471984127 0.169275419396122 0.603575902516798 0.872978293733491 0.17204138884611 0.869588012581335 1.32455313091434
In [3]:
data$Nb_RCTs <- paste(format(round(data$Nb_RCTs_med),nsmall = 0),
" [",format(round(data$Nb_RCTs_low),nsmall = 0),
"--",format(round(data$Nb_RCTs_up),nsmall = 0),"]")
data$Nb_Patients <- paste(format(round(data$Nb_Patients_med),nsmall = 0),
" [",format(round(data$Nb_Patients_low),nsmall = 0),
"--",format(round(data$Nb_Patients_up),nsmall = 0),"]")
data$Prop_RCTs <- paste(format(round(data$Prop_RCTs_med,1),nsmall = 1),
" [",format(round(data$Prop_RCTs_low,1),nsmall = 1),
"--",format(round(data$Prop_RCTs_up,1),nsmall = 1),"]")
data$Prop_Patients <- paste(format(round(data$Prop_Patients_med,1),nsmall = 1),
" [",format(round(data$Prop_Patients_low,1),nsmall = 1),
"--",format(round(data$Prop_Patients_up,1),nsmall = 1),"]")
In [4]:
head(data[,c("Region","Disease","Nb_RCTs","Nb_Patients","Prop_RCTs","Prop_Patients")])
Region Disease Nb_RCTs Nb_Patients Prop_RCTs Prop_Patients
1 Central Europe, Eastern Europe, and Central Asia Tuberculosis 17 [ 4 -- 28 ] 3727 [ 818 -- 8286 ] 0.3 [ 0.1 -- 0.5 ] 0.2 [ 0.1 -- 0.5 ]
2 High-income Tuberculosis 95 [ 28 -- 186 ] 20936 [ 4761 -- 80181 ] 0.2 [ 0.0 -- 0.3 ] 0.1 [ 0.0 -- 0.4 ]
3 Latin America and Caribbean Tuberculosis 29 [ 8 -- 42 ] 41578 [ 2031 -- 46855 ] 0.7 [ 0.2 -- 1.0 ] 4.9 [ 0.3 -- 5.7 ]
4 North Africa and Middle East Tuberculosis 17 [ 4 -- 31 ] 2930 [ 426 -- 4985 ] 0.2 [ 0.1 -- 0.4 ] 0.4 [ 0.1 -- 0.6 ]
5 South Asia Tuberculosis 40 [ 11 -- 56 ] 14501 [ 3185 -- 23037 ] 0.9 [ 0.2 -- 1.3 ] 0.8 [ 0.2 -- 1.3 ]
6 Southeast Asia, East Asia and Oceania Tuberculosis 53 [ 15 -- 76 ] 28047 [ 5567 -- 41850 ] 0.6 [ 0.2 -- 0.9 ] 0.9 [ 0.2 -- 1.3 ]
In [5]:
data[data$Dis=="All" & data$Region%in%c("All","High-income","Non-HI"),c("Region","Disease","Nb_RCTs","Nb_Patients")]
Region Disease Nb_RCTs Nb_Patients
200 High-income All 60631 [ 58035 -- 62973 ] 18964733 [ 17965003 -- 19913083 ]
206 All All 82179 [ 78662 -- 85358 ] 30082791 [ 28545370 -- 31513723 ]
207 Non-HI All 27564 [ 26405 -- 28597 ] 11117752 [ 10376596 -- 11813323 ]
In [32]:
dall <- data[data$Region=="All",]
In [33]:
dall[order(dall$Nb_RCTs_low,decreasing=TRUE),c("Region","Disease","Nb_RCTs","Nb_Patients","Prop_RCTs","Prop_Patients")]
Region Disease Nb_RCTs Nb_Patients Prop_RCTs Prop_Patients
206 All All 82179 [ 78662 -- 85358 ] 60121077 [ 38736579 -- 62786199 ] NA [ NA -- NA ] NA [ NA -- NA ]
26 All Neoplasms 12024 [ 11148 -- 12728 ] 8640118 [ 5358052 -- 9290342 ] 13.1 [ 12.2 -- 13.9 ] 13.2 [ 8.5 -- 19.2 ]
89 All Diabetes, urinary diseases and male infertility 11700 [ 10614 -- 12854 ] 5852132 [ 4398439 -- 9441960 ] 14.0 [ 12.7 -- 15.3 ] 9.7 [ 7.3 -- 19.4 ]
35 All Cardiovascular and circulatory diseases 10676 [ 9527 -- 11943 ] 4975478 [ 4234637 -- 24518980 ] 12.8 [ 11.5 -- 14.3 ] 8.3 [ 6.9 -- 39.4 ]
80 All Mental and behavioral disorders 9346 [ 8684 -- 10040 ] 2876536 [ 2292539 -- 3887152 ] 11.3 [ 10.5 -- 12.3 ] 4.8 [ 3.8 -- 8.1 ]
116 All Musculoskeletal disorders 6949 [ 6189 -- 7783 ] 2050558 [ 1596605 -- 3331659 ] 8.3 [ 7.4 -- 9.3 ] 3.4 [ 2.6 -- 6.3 ]
62 All Digestive diseases (except cirrhosis) 6734 [ 5571 -- 8754 ] 1889907 [ 1327402 -- 4873256 ] 8.3 [ 6.9 -- 10.7 ] 3.3 [ 2.2 -- 8.6 ]
71 All Neurological disorders 6388 [ 5562 -- 7295 ] 1547648 [ 1219633 -- 3028043 ] 7.8 [ 6.8 -- 8.9 ] 2.6 [ 2.0 -- 5.9 ]
134 All Sense organ diseases 5209 [ 4505 -- 5981 ] 1347380 [ 1003503 -- 2178688 ] 6.3 [ 5.5 -- 7.2 ] 2.3 [ 1.7 -- 4.1 ]
44 All Chronic respiratory diseases 4773 [ 4303 -- 5283 ] 1759433 [ 1441357 -- 2364790 ] 5.8 [ 5.2 -- 6.4 ] 2.9 [ 2.4 -- 4.9 ]
125 All Skin and subcutaneous diseases 4346 [ 3524 -- 5744 ] 1892847 [ 1081970 -- 3437999 ] 5.3 [ 4.3 -- 7.0 ] 3.2 [ 1.8 -- 6.9 ]
152 All Diarrhea, lower respiratory infections, meningitis, and other common infectious diseases 3497 [ 2855 -- 4273 ] 3420205 [ 2441898 -- 4501061 ] 4.2 [ 3.4 -- 5.2 ] 5.7 [ 4.1 -- 9.7 ]
107 All Gynecological diseases 2730 [ 2158 -- 4225 ] 1104376 [ 766976 -- 2403993 ] 3.3 [ 2.6 -- 5.1 ] 1.9 [ 1.3 -- 4.4 ]
179 All Maternal disorders 2208 [ 1398 -- 3488 ] 1048352 [ 615492 -- 3770108 ] 2.6 [ 1.7 -- 4.2 ] 1.8 [ 1.0 -- 6.3 ]
143 All Oral disorders 2249 [ 1184 -- 6507 ] 821855 [ 317343 -- 4418141 ] 2.7 [ 1.4 -- 7.7 ] 1.4 [ 0.5 -- 7.7 ]
98 All HIV/AIDS 1494 [ 1147 -- 1753 ] 1223251 [ 735571 -- 1566983 ] 1.7 [ 1.3 -- 2.1 ] 2.0 [ 1.2 -- 3.3 ]
197 All Nutritional deficiencies 1279 [ 678 -- 2138 ] 580576 [ 284915 -- 1426262 ] 1.5 [ 0.8 -- 2.5 ] 1.0 [ 0.5 -- 2.6 ]
188 All Neonatal disorders 1424 [ 639 -- 3613 ] 1549845 [ 441227 -- 3634887 ] 1.7 [ 0.8 -- 4.3 ] 2.6 [ 0.8 -- 6.7 ]
17 All Hepatitis 913 [ 602 -- 1300 ] 403618 [ 211789 -- 782205 ] 1.1 [ 0.7 -- 1.5 ] 0.7 [ 0.4 -- 1.4 ]
53 All Cirrhosis of the liver 1061 [ 535 -- 1574 ] 358782 [ 139311 -- 785988 ] 1.3 [ 0.6 -- 1.9 ] 0.6 [ 0.2 -- 1.4 ]
170 All Neglected tropical diseases excluding malaria 492 [ 329 -- 849 ] 1018730 [ 624681 -- 1308825 ] 0.6 [ 0.4 -- 1.0 ] 1.7 [ 1.0 -- 2.7 ]
161 All Malaria 435 [ 260 -- 546 ] 1973478 [ 834820 -- 2208020 ] 0.5 [ 0.3 -- 0.6 ] 3.2 [ 1.4 -- 5.2 ]
8 All Tuberculosis 298 [ 91 -- 454 ] 2691157 [ 179759 -- 3721926 ] 0.4 [ 0.1 -- 0.5 ] 4.5 [ 0.3 -- 8.4 ]
In [ ]:
Content source: iatal/RCTvsBurden
Similar notebooks: