/* This sas program will produce the estimates in Example 5.2
    of Sampling:  Design and Analysis by Sharon L. Lohr,
    using Version 7 of SAS */

 /* Author:  S. Lohr, 3/99.  Copyright (c) Sharon L. Lohr, 1999*/

options ls=78 ps=35;
 
data gpa;
   input suite gpa;
   wt = 20;  /* every person has weight 100/5 = 20 */
   cards;
1 3.08
1 2.60
1 3.44
1 3.04
2 2.36
2 3.04
2 3.28
2 2.68
3 2.00
3 2.56
3 2.52
3 1.88
4 3.00
4 2.88
4 3.44
4 3.64
5 2.68
5 1.92
5 3.28
5 3.20
;

proc print data=gpa;

 /*  Note that total is to specify the number of psu's, not
     the number of observation units */


proc surveymeans data=gpa total = 100 nobs mean sum; 
   cluster suite;
   var gpa;

proc surveymeans data=gpa total = 100 nobs mean sum; 
   cluster suite;
   var gpa;
   weight wt;