Simple Two-sided Bar Chart

This is a two-sided bar chart. This specific type of chart is efficient at comparing aspects of a test or data set in order to predict a certain outcome. This is shown in the graph below.

This chart can be created using the following code in Stata:

clear
input input low high mean
 1 1.6 2.2 1.9
 2 1.5 2.3 1.9
 5 2.9 0.01 1.9
 3 1.0 2.9 1.9
 4 0.5 3.2 1.9
end
label var input "Input"
label var low "Low value"
label var high "High value"
label var mean "Mean"
label define inputlbl 1 "Annual Donations in U.S." 2 "Seroprevalence" 3 "Exposures per Donation" 4 "Probability of Transmission" 5 "Sensitivity of Test"
label val input inputlbl
gen sens = high-low
sort sens
local ml1 = (2.2+1.9)/2
local mh1 = (1.6+1.9)/2
local ml2 = (2.3+1.9)/2
local mh2 = (1.5+1.9)/2
local ml3 = (2.9+1.9)/2
local mh3 = (1.0+1.9)/2
local ml4 = (3.2+1.9)/2
local mh4 = (0.5+1.9)/2
local ml5 = (2.9+1.9)/2
local mh5 = (0 +1.9)/2
local format fcolor(white) lcolor(white)
twoway (rbar low mean input, horizontal) (rbar mean high input, horizontal), ylabel(, val angle(horizontal)) xtitle(" " "Predicted Cases of Transfusion-Transmitted T. Cruzi") title("Sensitivity of Results to Inputs") subtitle("Test Once Scenario") legend(label(1 "Low Input Values") label(2 "High Input Values") rows(2)) text(5 `ml5' "93.5%", box j(center) margin(l+1 r+1 t+1 b+1) `format') text(5 `mh5' "99.99%", box j(center) margin(l+1 r+1 t+1 b+1) `format') text(4 `ml4' "5%", box j(center) margin(l+1 r+1 t+1 b+1) `format') text(4 `mh4' "0.8%", box j(center) margin(l+1 r+1 t+1 b+1) `format') text(3 `ml3' "3", box j(center) margin(l+1 r+1 t+1 b+1) `format') text(3 `mh3' "1", box j(center) margin(l+1 r+1 t+1 b+1) `format') text(2 1.4 "1:28,600", box margin(l+1 r+1 t+1 b+1) `format' placement(9) j(right)) text(2 2.4 "1:18,200", box margin(l+1 r+1 t+1 b+1) `format' placement(3) j(left)) text(1 1.5 "13.4 million", box margin(l+1 r+1 t+1 b+1) `format' placement(9) j(right)) text(1 2.4 "19 million", box margin(l+1 r+1 t+1 b+1) `format' placement(3) j(left))