/* SAS-kertausta */

data mix.mitat;
input id sukup $ pituus paino;
datalines;
1 M 168.5 75
2 F 171.2 99
3 F 163.0 55
4 M 167.0 105
5 M 168.6 80
6 F 165.1 85
7 M 172.4 100
;


/* Lineaarinen regressio */

data mix.measures;
input id gender $ weight height;
datalines;
1  1 86.8 198.6
2  1 63.4 156.4
3  1 83.5 155.3
4  1 73.3 185.9
5  1 74.6 176.2
6  1 46.6 149.6
7  1 50.1 145.1
8  1 96.4 196.8
9  1 72.3 175.4
10 1 78.1 187.9
11 0 79.2 174.6
12 0 83.3 199.4
13 0 74.5 162.4
14 0 97.8 196.4
15 0 81.0 192.9
16 0 85.4 193.7
17 0 66.3 149.0
18 0 75.3 153.0
19 0 92.3 193.8
20 0 77.4 174.5
;

/* 1-ANOVA */

data mix.chol;
input center $ treat $ chol;
datalines;
1   1   0.27
1   2   0.71
1   3   0.82
1   1   0.17
1   2   0.73
1   3   0.69
2   1   0.37
2   2   0.68
2   3   0.96
2   1   0.27
2   2   0.78
2   3   1.26
3   1   0.26
3   2   0.22
3   3   0.34
3   1   0.16
3   2   0.12
3   3   0.14
4   1   0.32
4   2   0.78
4   3   0.77
4   1   0.23
4   2   0.87
4   3   0.66
5   1   0.53
5   2   0.74
5   3   0.73
5   1   0.33
5   2   0.44
5   3   0.33
6   1   0.05
6   2   0.70
6   3   0.98
6   1   0.25
6   2   0.00
6   3   1.28
7   1   -0.05
7   2   0.84
7   3   1.09
7   1   0.29
7   2   0.44
7   3   1.29
8   1   0.85
8   2   1.04
8   3   1.09
8   1   1.15
8   2   0.64
8   3   1.19
;