title;                                                                                                 
options nodate;                                                                                        
proc dmvq data=_EMSPDE.sp_DGM00013 dmdbcat=EMPROJ.sp_DGM00013 std=std                                  
;                                                                                                      
input                                                                                                  
G                                                                                                      
SLG                                                                                                    
AVG                                                                                                    
OBP                                                                                                    
AB                                                                                                     
R                                                                                                      
H                                                                                                      
H2                                                                                                     
H3                                                                                                     
HR                                                                                                     
RBI                                                                                                    
BB                                                                                                     
SO                                                                                                     
SB                                                                                                     
/level=interval                                                                                        
missing=Ignore;                                                                                        
;                                                                                                      
SOM rows=2 cols=2 rowname=Row rowlabel="Row"                                                           
colname=Column collabel="Column" somname=SOM_ID somlabel="SOM ID"                                      
clusname=_SEGMNT_ cluslabel="Cluster ID";                                                              
MAKE outvar=EMPROJ.SOMK3UPH;                                                                           
INITIAL radius=0 Princomp;                                                                             
TRAIN tech=nwsom;                                                                                      
TRAIN tech=llsom;                                                                                      
SAVE outstat=EMPROJ.SOM5HDIJ(label="Clustered Statistics for EMDATA.VIEW_IPL") outmean=EMPROJ.SOMOFR1S;
CODE metabase=EMPROJ.T24WWG53.SCR9RNOP.SOURCE;                                                         
run;                                                                                                   
quit;