Title 'Homework # 8'.
Subtitle 'Problem 5'.
* Adapted from Hays, 4th Edition, p. 607.
DATA LIST FREE / X1 X2 X3 Y.
BEGIN DATA.
23   25     8   24
32   30    13   30
25   25    15   25
36   31    10   35
37   36     9   39
31   33    10   30
28   22     8   27
26   18     5   14
20   14    13   39
35   30    15   42
42   36    11   41
40   30    11   38
32   27    12   39
33   38    10   37
45   40    18   47
30   31    13   30
29   25    12   36
28   24     4   12
24   27    10   26
18   20     8   20
37   35    16   43
27   29    15   31
39   32    14   40
34   30     7   31
48   40    12   36
37   31     6   21
44   41    19   44
23   26     5   11
29   24     8   27
38   30     9   24
41   20    15   40
39   31     7   32
27   29     6   10
48   43    14   37
33   30     7   19
END DATA.
VAR LABELS X1 "Father's interest" X2 "Mother's interest"
           X3 "Phys ed instructor's evaluation" Y "Girl's interest".
REGRESSION /DESCRIPTIVES ALL /STATISTICS DEF CI
          / DEPENDENT Y /METHOD ENTER X1.


*****************************************************************************.
* Solutions to other problems follow -- if you can fix this program so 
* it works!

* Problem 1.
* First, we have to enter the data.  Use the Matrix Data
* command to enter data where you have the means, SDs and
* correlations but not the raw data.

MATRIX DATA VARIABLES=ROWTYPE_ Income Food.
BEGIN DATA
MEAN 25 10
STDDEV 6.03022689155527245293624133940125    3.01511344577763622646812066970062
N 100 100
CORR 1
CORR 0.666666666666666666666666666666667     1
END DATA.

* Now do the regression command.  Note that the first parameter when data
* are entered in matrix form is Matrix=IN.
***** Uncomment the next line to make it run.
*REGRESSION
  /Matrix=IN(*)
  /DESCRIPTIVES ALL
  /MISSING LISTWISE
  /STATISTICS DEF CI
  /CRITERIA=PIN(.05) POUT(.10)
  /NOORIGIN
  /DEPENDENT food
  /METHOD=ENTER income  .


***********************************.
Subtitle 'Problem 2'.
DATA LIST FREE / auto air.
BEGIN DATA.
0 2
1 4
2 3
END DATA.

* "Rarely is the question asked: Is our children learning?"
* - George Bush, Florence, S.C., Jan. 11, 2000.

***** Need a regression card here!.

***********************************.
Subtitle  'Problem 4'.
DATA LIST FIXED / bid 1-7 value 12-15 numbids 19 moody 24-26 (A) .
BEGIN DATA.
 97.682    13.0   2    A
 98.424     6.0   5    A
101.435     9.0   5    Aa
102.266     5.5   7    Aaa
 97.067     7.0   3    Baa
 97.397     9.5   2    Ba
 99.481    17.0   2    Aa
 99.613    12.5   5    A
 96.901    13.5   2    Ba
100.152    12.5   3    Aaa
 98.797    13.0   4    Baa
100.796     7.5   6    Aa
 98.750     7.5   2    Aa
 97.991    12.0   3    Ba
100.007    14.0   4    Aaa
 98.615    11.5   6    Ba
100.225    15.0   2    Aa
 98.388     8.5   6    Baa
 98.937    14.5   7    A
100.617     9.5   5    Aaa
END DATA.

* We'll recode the Moody variable into a new var we can use in a regression.
* Rating will be the IV in the regression command.

Recode Moody ('Aaa' = 1) ('Aa ' = 2) ('A  ' = 3)
   ('Baa' = 4) ('Ba '= 5) Into Rating.

* "You teach a child to read, and he or her will 
* be able to pass a literacy test.''
* - President Bush, Townsend, Tenn., Feb. 21, 2001.

***** Need a regression card here!.