options ls=72; data conch1; input number snake gender $ svl age tail; drop number snake; if age GT 1.5; if tail ne 81; label gender = Gender of the Snake svl = Snout to Vent Length tail = Tail Length age = Age of the snake; cards; 1 6 female 243 1 83 3 8 female 180 1 62 5 15 female 208 1 74 6 19 female 200 1 70 7 20 female 178 1 63 8 23 female 167 1 58 9 24 female 168 1 61 10 30 female 190 1 67 11 33 female 211 1 75 12 39 female 208 1 75 13 41 female 185 1 63 14 43 female 206 1 73 15 45 female 225 1 75 16 50 female 183 1 60 17 51 female 202 1 71 18 52 female 247 1 87 19 54 female 227 1 80 21 56 female 220 1 76 23 58 female 191 1 70 24 60 female 165 1 58 25 63 female 195 1 71 26 64 female 174 1 59 27 69 female 202 1 70 28 70 female 169 1 60 29 71 female 160 1 57 30 1 female 441 2 127 31 7 female 455 2 171 32 16 female 462 2 171 33 37 female 446 2 164 34 40 female 463 2 165 35 59 female 393 2 127 36 78 female 451 2 162 37 89 female 376 2 133 38 95 female 475 2 173 39 100 female 398 2 145 40 103 female 435 2 154 41 13 female 491 3 165 42 17 female 485 3 178 43 55 female 477 3 169 44 61 female 530 3 186 45 79 female 478 3 170 46 86 female 511 3 182 47 87 female 475 3 172 48 88 female 487 3 182 49 95 female 454 3 172 50 102 female 502 3 183 51 104 female 483 3 170 52 105 female 477 3 171 53 106 female 493 3 181 54 107 female 490 3 167 56 112 female 493 3 175 57 113 female 477 3 139 58 114 female 501 3 183 59 61 female 537 4 198 60 74 female 566 4 190 61 74 female 569 4 192 62 83 female 574 4 211 63 92 female 570 4 206 64 93 female 573 4 206 65 96 female 531 4 165 66 97 female 528 4 189 67 98 female 536 4 195 68 4 male 193 1 60.00 69 5 male 205 1 62 70 9 male 200 1 60 72 10 male 155 1 49 73 12 male 203 1 63 75 14 male 184 1 58 76 18 male 228 1 69 77 25 male 203 1 62 78 26 male 185 1 59 79 27 male 180 1 59 80 28 male 170 1 51 81 31 male 182 1 52 82 32 male 160 1 50 84 35 male 170 1 51 85 36 male 176 1 53 86 42 male 231 1 69 87 44 male 161 1 50 88 46 male 166 1 50 89 47 male 170 1 50 90 48 male 179 1 58 91 49 male 184 1 57 92 57 male 205 1 64 93 66 male 179 1 57 94 67 male 200 1 60 95 68 male 195 1 56 96 72 male 282 1 83 97 73 male 292 1 90 98 2 male 457 2 126 100 21 male 466 2 128 101 22 male 466 2 151 102 62 male 361 2 115 103 77 male 473 2 138 104 85 male 477 2 145 105 3 male 507 3 145 106 11 male 493 3 145 107 29 male 558 3 158 109 65 male 495 3 152 110 75 male 521 3 159 111 82 male 487 3 138 112 94 male 565 3 166 113 94 male 585 3 168 114 101 male 550 3 160 116 34 male 652 4 181 117 38 male 587 4 185 118 53 male 606 4 172 119 76 male 591 4 180 120 80 male 683 4 205 121 81 male 625 4 175 122 84 male 612 4 182 123 90 male 618 4 185 124 91 male 613 4 81 125 99 male 600 4 167 126 108 male 602 4 167 127 109 male 596 4 160 129 110 male 611 4 165 130 111 male 603 4 173 data conchf; set conch1; if gender = 'female'; data conchm; set conch1; if gender = 'male'; proc means; symbol1 value=dot height=2; symbol1 w=5 i=rl; symbol2 value=dot height=2; proc gplot data = conchf; plot svl * tail svl * tail / overlay haxis = 110 to 210 by 20 vaxis = 250 to 650 by 50; title 'Concho Water Snake Data, Females'; proc means; symbol1 value=dot height=2; symbol1 w=5 i=rlcli; symbol2 value=dot height=2; proc gplot data = conchf; plot svl * tail svl * tail / overlay haxis = 110 to 210 by 20 vaxis = 300 to 750 by 50; title 'Concho Water Snake Data, Females'; proc means; symbol1 value=dot height=2; symbol1 w=5 i=rl; symbol2 value=dot height=2; proc gplot data = conchm; plot svl * tail svl * tail / overlay haxis = 110 to 210 by 20 vaxis = 250 to 650 by 50; title 'Concho Water Reduced Snake Data, Males'; proc means; symbol1 value=dot height=2; symbol1 w=5 i=rlcli; symbol2 value=dot height=2; proc gplot data = conchm; plot svl * tail svl * tail / overlay haxis = 110 to 210 by 20 vaxis = 300 to 750 by 50; title 'Concho Water Snake Reduced Data, Males'; proc means; symbol1 value=dot height=2; symbol1 w=5 i=rl; symbol2 value=dot height=2; proc reg data = conchm; model svl = tail ; title 'Concho Water Snake Reduced Data, Males'; output out = conmd cookd = cookd residual=resid; data conmd2; set conmd; aresid = abs(resid); label cookd = Cooks Distance aresid = Absolute Residual: SVL on Tail Length resid = Residual of SVL on Tail Length; proc gplot data = conmd2; plot aresid * tail aresid * tail / overlay; title 'Concho Water Snake Reduced Data, Males, Absolute Residuals'; proc reg data = conchf; model svl = tail ; title 'Concho Water Snake Data, Females'; output out = confd cookd = cookd residual=resid; data confd2; set confd; aresid = abs(resid); label cookd = Cooks Distance aresid = Absolute Residual: SVL on Tail Length resid = Residual of SVL on Tail Length; proc gplot data = confd2; plot aresid * tail aresid * tail / overlay; title 'Concho Water Snake Data, Females, Absolute Residuals'; run;