options ls = 72; data bluebon1; input height numpetal nearfar $; levhei = 0; if nearfar = 'Near' then levhei = abs(height - 30); if nearfar = 'Far' then levhei = abs(height - 30); levnum = 0; if nearfar = 'Near' then levnum = abs(numpetal - 3); if nearfar = 'Far' then levnum = abs(numpetal - 5); label height = Bluebonnet Height numpetal = Number of red petals levhei = Levene Test for Height levnum = Levene Test for Number of Petals nearfar = Distance from Highway; cards; 29 3 Near 24 2 Near 22 6 Near 27 2 Near 40 1 Near 34 3 Near 30 4 Near 34 2 Near 38 2 Near 38 0 Near 27 2 Near 37 3 Near 28 2 Near 36 1 Near 32 2 Near 37 0 Near 29 2 Near 29 2 Near 31 3 Near 33 5 Near 20 1 Near 39 0 Near 36 2 Near 31 4 Near 43 5 Near 34 5 Near 25 3 Near 29 9 Near 26 2 Near 30 5 Near 30 0 Near 31 3 Near 16 4 Near 31 5 Near 30 4 Near 37 6 Near 31 3 Near 28 4 Near 32 6 Near 25 0 Near 33 4 Near 27 4 Near 25 3 Near 16 6 Near 26 5 Near 20 5 Near 30 5 Near 20 0 Near 23 3 Near 21 5 Near 22 2 Near 19 2 Near 15 5 Near 28 3 Near 21 6 Near 30 5 Near 35 3 Near 31 4 Near 38 4 Near 33 0 Near 35 2 Near 33 3 Near 31 0 Near 26 3 Near 33 1 Near 25 5 Near 33 0 Near 25 4 Near 25 3 Near 32 4 Near 25 4 Near 27 2 Near 38 4 Near 24 1 Near 18 2 Near 30 3 Near 33 2 Near 27 3 Near 24 3 Near 36 3 Near 29 5 Near 38 4 Near 29 5 Near 25 5 Near 28 3 Near 22 2 Near 25 2 Near 37 5 Near 30 4 Near 26 5 Near 37 1 Near 41 2 Near 24 4 Near 33 2 Near 30 5 Near 37 0 Near 40 3 Near 30 3 Near 44 3 Near 33 1 Near 23 9 Far 20 9 Far 22 6 Far 24 9 Far 29 11 Far 27 13 Far 25 5 Far 36 5 Far 30 7 Far 29 6 Far 28 6 Far 28 10 Far 31 6 Far 26 7 Far 26 3 Far 25 3 Far 30 6 Far 31 8 Far 27 5 Far 27 6 Far 26 5 Far 29 6 Far 24 4 Far 28 4 Far 23 3 Far 24 5 Far 23 2 Far 24 6 Far 21 2 Far 21 3 Far 21 2 Far 22 2 Far 33 5 Far 30 5 Far 33 10 Far 22 2 Far 20 6 Far 16 6 Far 23 7 Far 38 3 Far 29 6 Far 33 4 Far 28 4 Far 32 9 Far 32 7 Far 35 5 Far 18 4 Far 32 8 Far 33 7 Far 35 1 Far 17 0 Far 12 1 Far 43 4 Far 14 2 Far 41 3 Far 24 7 Far 42 2 Far 31 2 Far 33 9 Far 29 0 Far 41 1 Far 31 4 Far 42 3 Far 47 3 Far 41 8 Far 48 9 Far 33 6 Far 32 4 Far 31 3 Far 26 3 Far 30 2 Far 39 5 Far 35 4 Far 32 3 Far 27 8 Far 33 4 Far 24 5 Far 20 2 Far 33 2 Far 33 0 Far 22 3 Far 23 4 Far 35 6 Far 25 2 Far 38 7 Far 29 5 Far 30 3 Far 34 1 Far 34 6 Far 16 1 Far 30 5 Far 39 4 Far 33 4 Far 33 8 Far 40 5 Far 41 4 Far 36 7 Far 30 5 Far 34 6 Far 49 5 Far proc sort; by nearfar; proc univariate plot; var height numpetal; by nearfar; title BLUEBONNET Data; proc ttest cochran; class nearfar; var height numpetal; title BLUEBONNET Data; proc npar1way wilcoxon; class nearfar; var height numpetal; title BLUEBONNET Data; proc ttest cochran; class nearfar; var levhei levnum; title BLUEBONNET Data, Levene Test; proc npar1way wilcoxon; class nearfar; var levhei levnum; title BLUEBONNET Data, Levene Test; run;