title: Guttman for the Heinen data;

data: file is c:\MyDocu~1\stuffinmplus\heinen2.2\expanddatap46heinen.csv;

variable: names are x1 x2 x3 x4 x5 sex;
 
    !useobservations =  sex eq 99;    
    !!! This command restricts the analysis to boys=99 or girls=98 only;            
missing are .;

usevariables are x1-x4;
categorical are x1-x4;
classes = liberation(5);   

analysis: type = mixture;
          
model:
            %overall%
            
            %liberation#1%
   ! Following Heinen page 73 the ordering of the questions
   ! is 4 2 1 3 5 
   !If the person says 0 ("they agree") (i.e. response 1 vs 2) to question
   ! 4, then they are going to say 0 to everything so they have probability
   ! one of saying 0 to everything
            [x4$1@15 x2$1@15 x1$1@15 x3$1@15 ];    
            
            %liberation#2%
            [x4$1@-15 x2$1@15 x1$1@15 x3$1@15 ];
        
            %liberation#3%
            [x4$1@-15 x2$1@-15 x1$1@15 x3$1@15 ];
            
            %liberation#4%
            [x4$1@-15 x2$1@-15 x1$1@-15 x3$1@15 ];  
            
            %liberation#5%
            [x4$1@-15 x2$1@-15 x1$1@-15 x3$1@-15];  
          
    
output:  tech8 tech10 tech11;

!savedata: file is c:\MyDocu~1\stuffinmplus\heinen2.2\lca3estimates;
!          save = cprobabilities;