sas_kruskal1a1

DATA A;
INPUT FABRICANTE REP DESGASTE;
DATALINES;
1   1   2.08
1   2   2.02
1   3   2.13
1   4   2.08
1   5   2.07
1   6   2.08
1   7   2.16
1   8   2.09
1   9   2.07
1   10  2.02
1   11  2.09
1   12  2.13
1   13  2.01
1   14  2.09
1   15  2.1
1   16  2.12
1   17  2.05
1   18  2.03
1   19  2.16
1   20  2.04
2   1   3.05
2   2   3.19
2   3   3.12
2   4   3.39
2   5   3.04
2   6   3.64
2   7   3.04
2   8   3.48
2   9   3.3
2   10  3.1
2   11  3
2   12  3
2   13  3.06
2   14  3.32
2   15  3.04
2   16  3.02
2   17  3.02
2   18  3.2
2   19  3.13
2   20  3.11
3   1   4.15
3   2   4.09
3   3   4.12
3   4   4.27
3   5   4.39
3   6   4.01
3   7   4.1
3   8   4.14
3   9   4.66
3   10  4.47
3   11  4.07
3   12  4.22
3   13  4.25
3   14  4.37
3   15  4.37
3   16  4.16
3   17  4.35
3   18  4.9
3   19  4.33
3   20  4.05
4   1   5.77
4   2   5
4   3   5.35
4   4   5.09
4   5   5.16
4   6   5.09
4   7   5.31
4   8   5.09
4   9   5.14
4   10  5.25
4   11  5.07
4   12  5.16
4   13  5.5
4   14  5.09
4   15  5.31
4   16  5.01
4   17  5.36
4   18  5.56
4   19  5.21
4   20  5.78
5   1   6.56
5   2   6
5   3   6.14
5   4   6.45
5   5   6.22
5   6   6.08
5   7   6.04
5   8   6.15
5   9   6.06
5   10  6.47
5   11  6.1
5   12  6.3
5   13  6.21
5   14  6.58
5   15  6.51
5   16  6.16
5   17  6.08
5   18  6.18
5   19  6.09
5   20  6.48
;
proc print data=a; run;

/*Testar normalidade */
PROC UNIVARIATE NORMAL DATA=A;
VAR DESGASTE;
RUN;

ODS GRAPHICS OFF;
/*Testar homegeneidade de variancias*/
PROC TRANSREG DATA=A PLOTE=NONE;
MODEL BOXCOX(DESGASTE)= CLASS(FABRICANTE);
RUN;

data b; set A;
T_DESGASTE = LOG(DESGASTE);
run;
proc print data=B; run;

/*Testar normalidade da variavel transformada*/
PROC UNIVARIATE NORMAL DATA=B;
VAR T_DESGASTE;
RUN;

/*A VARIAVEL TRANSFORMADA CONTINUA SENDO NAO NORMAL*/
/*CONTINUAR COM TESTES NAO PARAMETRICO, NESTE CASO KUSKRAL-WALLIS POR SER*/

PROC NPAR1WAY WILCOXON DATA=B;
CLASS FABRICANTE;
VAR DESGASTE;
RUN;

PROC NPAR1WAY DATA=B WILCOXON;
WHERE FABRICANTE = 1 OR FABRICANTE = 2;
CLASS FABRICANTE;
VAR DESGASTE;
RUN;

PROC NPAR1WAY DATA=B WILCOXON;
WHERE FABRICANTE = 1 OR FABRICANTE = 3;
CLASS FABRICANTE;
VAR DESGASTE;
RUN;

PROC NPAR1WAY DATA=B WILCOXON;
WHERE FABRICANTE = 1 OR FABRICANTE = 4;
CLASS FABRICANTE;
VAR DESGASTE;
RUN;

PROC NPAR1WAY DATA=B WILCOXON;
WHERE FABRICANTE = 1 OR FABRICANTE = 5;
CLASS FABRICANTE;
VAR DESGASTE;
RUN;

/*2 VS RESTO*/
PROC NPAR1WAY DATA=B WILCOXON;
WHERE FABRICANTE = 2 OR FABRICANTE = 3;
CLASS FABRICANTE;
VAR DESGASTE;
RUN;

PROC NPAR1WAY DATA=B WILCOXON;
WHERE FABRICANTE = 2 OR FABRICANTE = 4;
CLASS FABRICANTE;
VAR DESGASTE;
RUN;

PROC NPAR1WAY DATA=B WILCOXON;
WHERE FABRICANTE = 2 OR FABRICANTE = 5;
CLASS FABRICANTE;
VAR DESGASTE;
RUN;

/*3 VS RESTO*/
PROC NPAR1WAY DATA=B WILCOXON;
WHERE FABRICANTE = 3 OR FABRICANTE = 4;
CLASS FABRICANTE;
VAR DESGASTE;
RUN;

PROC NPAR1WAY DATA=B WILCOXON;
WHERE FABRICANTE = 3 OR FABRICANTE = 5;
CLASS FABRICANTE;
VAR DESGASTE;
RUN;

/*4 VS 5*/
PROC NPAR1WAY DATA=B WILCOXON;
WHERE FABRICANTE = 3 OR FABRICANTE = 5;
CLASS FABRICANTE;
VAR DESGASTE;
RUN;