*R-UCLA
*Kwiatkowska, M.M., Rogoza, R., Kwiatkowska, K. (in press). Analysis of the psychometric properties of the Revised UCLA Loneliness Scale in the Polish adolescent sample. Current Issues in Personality Psychology.

RECODE UCLA1 UCLA4 UCLA5 UCLA6 UCLA9 UCLA10 UCLA15 UCLA16 UCLA19 UCLA20 (1=4) (2=3) (3=2) (4=1) INTO 
R_UCLA1 R_UCLA4 R_UCLA5 R_UCLA6 R_UCLA9 R_UCLA10 R_UCLA15 R_UCLA16 R_UCLA19 R_UCLA20.
EXECUTE.
COMPUTE Loneliness=MEAN(R_UCLA1,UCLA2,UCLA3,R_UCLA4,R_UCLA5,R_UCLA6,UCLA7,UCLA8,R_UCLA9,R_UCLA10,UCLA11,UCLA12,UCLA13,UCLA14,R_UCLA15,R_UCLA16,UCLA17,UCLA18,R_UCLA19,R_UCLA20).
COMPUTE Intimate_Others=MEAN(UCLA14,UCLA11,UCLA18,UCLA2,UCLA13,UCLA3,UCLA7,UCLA17,UCLA8,UCLA12).
EXECUTE.
COMPUTE Social_Others=MEAN(R_UCLA19,R_UCLA20,R_UCLA10,R_UCLA16,R_UCLA15).
EXECUTE.
COMPUTE Belonging_and_Affiliation=MEAN(R_UCLA5,R_UCLA6,R_UCLA1,R_UCLA9,R_UCLA4,R_UCLA10).
EXECUTE. 

RELIABILITY
  /VARIABLES=R_UCLA1 UCLA2 UCLA3 R_UCLA4 R_UCLA5 R_UCLA6 UCLA7 UCLA8 R_UCLA9 R_UCLA10 UCLA11 UCLA12 UCLA13 UCLA14 R_UCLA15 R_UCLA16 UCLA17 UCLA18 R_UCLA19 R_UCLA20
  /SCALE('Loneliness') ALL
  /MODEL=ALPHA
  /SUMMARY=TOTAL.

RELIABILITY
  /VARIABLES=UCLA14 UCLA11 UCLA18 UCLA2 UCLA13 UCLA3 UCLA7 UCLA17 UCLA8 UCLA12
  /SCALE('Intimate_Others') ALL
  /MODEL=ALPHA
  /SUMMARY=TOTAL.

RELIABILITY
  /VARIABLES=R_UCLA19 R_UCLA20 R_UCLA10 R_UCLA16 R_UCLA15
  /SCALE('Social_Others') ALL
  /MODEL=ALPHA
  /SUMMARY=TOTAL.

RELIABILITY
  /VARIABLES=R_UCLA5 R_UCLA6 R_UCLA1 R_UCLA9 R_UCLA4 R_UCLA10
  /SCALE('Belonging_and_Affiliation') ALL
  /MODEL=ALPHA
  /SUMMARY=TOTAL.