data one;
input loc $ var $ y1;
cards;
UF      M     81.0     
UF      S     105.4   
UF      V     119.7  
UF      T     109.7 
UF      P      98.3
W       M     146.6   
W       S     142.0  
W       V     150.7    
W       T     191.5   
W       P     145.7   
M       M      82.3   
M       S      77.3   
M       V      78.4   
M       T     131.3   
M       P      89.6   
C       M     119.8    
C       S     121.4   
C       V     124.0  
C       T     140.8 
C       P     124.8   
GR      M      98.9  
GR      S      89.0 
GR      V      69.1   
GR      T      89.3  
GR      P     104.1 
D       M      86.9 
D       S      77.1  
D       V      78.9   
D       T     101.8 
D       P      96.0
;
run;

proc glm; class loc var;
model y1=loc var;
run;