***********************************************************************
* This is a program that illustrates the use of PROC FREQ in SAS for  *
* determining an exact confidence interval for sensitivity and        *
* specificity.                                                        *
***********************************************************************;

proc format;
value yesnofmt 1='yes' 2='no';
run;

data sensitivity;
input positive count;
format positive yesnofmt.;
cards;
1 14
2 01
;
run;

proc freq data=sensitivity;
tables positive/binomial alpha=0.05;
weight count;
title "Exact and Asymptotic 95% Confidence Intervals for Sensitivity";
run;

data specificity;
input negative count;
format negative yesnofmt.;
cards;
1 91
2 08
;
run;

proc freq data=specificity;
tables negative/binomial alpha=0.05;
weight count;
title "Exact and Asymptotic 95% Confidence Intervals for Specificity";
run;