dat1Summary.Ref <- c( " stu_id bysex byrace ", " Min. :101101 MALE :7578 AMER. INDIAN/ALASKA NATIVE, NON-HISPANIC: 130 ", " 1st Qu.:188119 FEMALE:7666 ASIAN, HAWAII/PAC. ISLANDER,NON-HISPANIC:1460 ", " Median :279116 BLACK OR AFRICAN AMERICAN, NON-HISPANIC :2020 ", " Mean :279163 HISPANIC, NO RACE SPECIFIED : 996 ", " 3rd Qu.:370205 HISPANIC, RACE SPECIFIED :1221 ", " Max. :461234 MORE THAN ONE RACE, NON-HISPANIC : 735 ", " WHITE, NON-HISPANIC :8682 " ) dat2Summary.Ref <- c( " sch_id byregion byurban ", " Min. :1011 MISSING : 8 MISSING : 8 ", " 1st Qu.:3391 NORTHEAST:283 URBAN :1374 ", " Median :5398 MIDWEST :468 SUBURBAN: 400 ", " Mean :4833 SOUTH :758 RURAL : 172 ", " 3rd Qu.:6273 WEST :437 ", " Max. :9999 " ) dat3Summary.Ref <- c( " stu_id f1ses1 f1ses1qu f1ses2 f1ses2qu ", " Min. :101101 Min. :-2.12000 LOWEST QUARTILE :3875 Min. :-2.12000 LOWEST QUARTILE :3860 ", " 1st Qu.:190180 1st Qu.:-0.51000 SECOND QUARTILE :3853 1st Qu.:-0.52000 SECOND QUARTILE :3826 ", " Median :281129 Median : 0.03000 THIRD QUARTILE :3925 Median :-0.02000 THIRD QUARTILE :3991 ", " Mean :279662 Mean : 0.03343 HIGHEST QUARTILE:4507 Mean : 0.03608 HIGHEST QUARTILE:4483 ", " 3rd Qu.:369213 3rd Qu.: 0.59000 3rd Qu.: 0.57000 ", " Max. :461234 Max. : 1.87000 Max. : 1.97000 " ) wgtNames.Ref <- c( "bystuwt", "f1qwt", "f1pnlwt", "f1trscwt", "f2qwt", "f2qtscwt", "f2bywt", "f2f1wt", "f3qwt", "f3bypnlwt", "f3f1pnlwt", "f3qtscwt", "f3bytscwt", "f3f1tscwt", "pswt", "f3bypnlpswt", "f3bytscpswt", "f3f1pnlpswt", "f3f1tscpswt", "f3qpswt", "f3qtscpswt", "pstscwt" )