Data test1;
input H;
cards;
105
100
106
110
96
102
107
98
104
112
;
Proc ttest H0=100;
run;
Data test2;
input t v;
cards;
1	3.4
1	3.7
1	3.2
1	3.6
1	3.3
1	3.8
2	4.3
2	4.5
2	4.4
2	4.8
;
proc ttest;
class t;
var v;
run;
data test3;
input t f;
cards;
1	13
1	14
1	16
1	17
1	15
2	13
2	10
2	19
;
proc ttest;
class t;
var f;
run;
data test4;
input r t y;
cards; 
1	1	4.4
1	2	5.7
1	3	3.2
1	4	3.8
2	1	4.8
2	2	6.1
2	3	3.5
2	4	4.2
3	1	4.5
3	2	6.4
3	3	3.3
3	4	3.6
;
proc anova;
class t;
model y=t;
run;
data test5;
input r t y;
cards;
1	1	17
1	2	15
1	3	14
1	4	12
1	5	10
2	1	19
2	2	14
2	3	13
2	4	5
2	5	12
3	1	16
3	2	15
3	3	16
3	4	14
3	5	11
4	1	18
4	2	13
4	3	15
4	4	13
4	5	11
;
proc glm;
class t;
model y=t/p;
run;
data test6;
input r t y;
cards;
1	1	4.4
1	2	5.7
1	3	3.2
1	4	3.8
2	1	4.8
2	2	6.1
2	3	3.5
2	4	4.2
3	1	4.5
3	2	6.4
3	3	3.3
3	4	3.6
;
proc univariate normaltest;
var t;
run;
proc glm;
class t;
model y=t;
output out = test7 p = pupt r=rupt;
run;
proc print data =test7;
run; 
proc univariate normaltest data = test7;
var rupt;
run;
proc glm data =test6;
class t;
model y=t;
means t/hovtest=levene hovtest=bartlett;
run;
proc glm data= test6;
class t;
model y=t;
means t/hovtest=levene;
output out = test8 p=pupt r=rupt;
run;
proc print data=test8;
run;
proc univariate normaltest data = test8;
var rupt;
run;
data test9;
input r t y;
cards;
1	1	6540
1	2	4875
1	3	4135
1	4	6080
1	5	3225
2	1	7160
2	2	5230
2	3	4595
2	4	5940
2	5	3460
3	1	7365
3	2	5365
3	3	4730
3	4	6315
3	5	3720
4	1	7080
4	2	5180
4	3	4265
4	4	5985
4	5	3345
;
proc glm;
class r t;
model y=r t;
output out=test10 p=pupt;
proc glm data=test10;
class r t;
model y=r t pupt*pupt;
run;
data test11;
input r t y;
logy = log(y); 
logy2 = log10(y);
sqrty = sqrt(y); 
Siny = sin(y);
cosy = cos(y);
tany = tan(y);
Moraba = y**2;
invert = 1/y;
cards;
1	1	6540
1	2	4875
1	3	4135
1	4	6080
1	5	3225
2	1	7160
2	2	5230
2	3	4595
2	4	5940
2	5	3460
3	1	7365
3	2	5365
3	3	4730
3	4	6315
3	5	3720
4	1	7080
4	2	5180
4	3	4265
4	4	5985
4	5	3345
;
proc print data=test11;
var invert moraba tany cosy siny sqrty logy2 logy;
run;
proc univariate normaltest data=test11;
var logy;
run;
proc glm data =test11;
class t;
model logy=t;
output out = test12 p = pupt r=rupt;
run;
proc print data =test12;
run; 
proc univariate normaltest data = test12;
var rupt;
run;
