#16_3 ach = c(-.43, .79, -.92, -2.19, -2.84, -.66, 2.63, 2.35, 0.91, .59) family = c(.608, .793, -.826, -1.253, .173, .202, .241, .594, -.615, .993) peer = c(.035, .479, -.619, -1.216, -.185, .127, -.090, .217, -.489, .622) school = c(.166, .533, -.786, -1.040, .142, .273, .049, .518, -.632, .933) #16_4 y=c(78.5,74.3,104.3,87.6,95.9,109.2,102.7,72.5,93.1,115.9,83.8,113.3,109.4) x1=c(7,1,11,11,7,11,3,1,2,21,1,11,10) x2=c(26,29,56,31,52,55,71,31,54,47,40,66,68) x3=c(6,15,8,8,6,9,17,22,18,4,23,9,8) x4=c(60,52,20,47,33,22,6,44,22,26,34,12,12)