TITLE:
  Ch 11a: New Baseline for Pseudo-R2 without Class Size Effects
  Predicting Student Closeness

DATA:
  ! Prior necessary data manipulation conducted using other programs
  FILE = MPLUS_Chapter11a.csv;
  FORMAT = FREE;

VARIABLE:
  NAMES = ClassID grade size StudID girl SMclose SMvic CMclose CMvic CMg CMemo
          size23 grade35 CMg50 CMemo5 CMvic3 WCclose SMvic3 WCvic wave emo vic close
          time1 time2 w3 WSclose vic3 WSvic emo5 WCemo;
  USEVARIABLES = close time1 girl CMg50;
  MISSING = ALL (-9999);
  CLUSTER = ClassID StudID;
  WITHIN = time1;
  BETWEEN = (StudID) girl (ClassID) CMg50;

ANALYSIS:
  ESTIMATOR = ML;
  PROCESSORS = 4;
  TYPE = THREELEVEL RANDOM;

MODEL:

%WITHIN%
  close;
  lin | close ON time1;

%BETWEEN StudID%
  close lin;
  close WITH lin;
  close lin ON girl (bintL2g blinL2g);

%BETWEEN ClassID%
  [close lin] (int btime1);
  close lin;
  close WITH lin;
  close lin ON CMg50 (bintL3g blinL3g);