* cytokine.txt;
/*************************************************************************
TNFalpha, a cytokine, causes inflammation which worsens the complications
due to acute pancreatitis (Source: Daniels, Biostatitics, 8th edition, page 401).
An experiment was conducted on rats to determine if a bile-infusion of a TNFalpha
will ameliaorate the effects of acute pancreatitis.  The experiment had three
treatment groups:
1. Sham group that received only a saline infusion.
2. Untreated Group  receiving a bile infusion without treatment.
3. Treated Group receiving bile influsion with an anti-TNFalpha antibody.
****************************************************************************/
options ls=76;
data tnfa;
input  group $ hemacrit;
datalines;
sham 38
sham 40
sham 32
sham 36
sham 40
sham 40
sham 38
sham 40
sham 38
sham 40
untreated 56
untreated 60
untreated 50
untreated 50
untreated 50
treated 40
treated 42
treated 38
treated 46
treated 36
treated 35
treated 40
treated 40
treated 55
treated 35
treated 36
treated 40
treated 40
treated 35
treated 45
;
proc sort;
     by group;
proc plot;
     plot hemacrit*group / vpos=20;
     run;
proc glm;
     class group;
     model hemacrit=group;
     means group;
     means group/tukey;
run;