*libname rodica "g:\Dropbox\FSEGA\cursuri\2013-2014\SAS\data\base\"; data work.empinfo; input FirstName $ 1-7 LastName $9-16 JobTitle 17-20 Salary 22-29; datalines; Donny Evans 112 29996.63 Lisa Helms 105 18567.23 John Higgins 111 25309.00 Amy Larson 113 32696.78 Mary Moore 112 28945.89 Jason Powell 103 35099.50 Judy Riley 111 25309.00 Neal Ryan 112 28180.00 ; data work.admit; input ID $ 1-4 Name $ 6-19 Sex $ 22 Age 26-27 Date 30-31 Height 36-37 Weight 43-45 ActLevel $ 50-53 Fee 57-62; format fee 7.2; datalines; 2458 Murray, W M 27 1 72 168 HIGH 85.20 2462 Almers, C F 34 3 66 152 HIGH 124.80 2501 Bonaventure, T F 31 17 61 123 LOW 149.75 2523 Johnson, R F 43 31 63 137 MOD 149.75 2539 LaMance, K M 51 4 71 158 LOW 124.80 2544 Jones, M M 29 6 76 193 HIGH 124.80 2552 Reberson, P F 32 9 67 151 MOD 149.75 2555 King, E M 35 13 70 173 MOD 149.75 2563 Pitts, D M 34 22 73 154 LOW 124.80 2568 Eberhardt, S F 49 27 64 172 LOW 124.80 2571 Nunnelly, A F 44 19 66 140 HIGH 149.75 2572 Oberon, M F 28 17 62 118 LOW 85.20 2574 Peterson, V M 30 6 69 147 MOD 149.75 2575 Quigley, M F 40 8 69 163 HIGH 124.80 2578 Cameron, L M 47 5 72 173 MOD 124.80 2579 Underwood, K M 60 22 71 191 LOW 149.75 2584 Takahashi, Y F 43 29 65 123 MOD 124.80 2586 Derber, B M 25 23 75 188 HIGH 85.20 2588 Ivan, H F 22 20 63 139 LOW 85.20 2589 Wilcox, E F 41 16 67 141 HIGH 149.75 2595 Warren, C M 54 7 71 183 MOD 149.75 ; data work.admitjune; input ID $ 1-4 Name $ 6-19 Sex $ 22 Age 25-26 @29 Date mmddyy8. Height 39-40 Weight 43-45 ActLevel $ 48-51 Fee 54-59; format date mmddyy8. fee 6.2; datalines; 2588 Ivan, H F 22 06/02/97 63 139 LOW 85.20 2586 Derber, B M 25 06/04/97 75 188 HIGH 85.20 2458 Murray, W M 27 06/05/97 72 168 HIGH 85.20 2572 Oberon, M F 28 06/05/97 62 118 LOW 85.20 2544 Jones, M M 29 06/07/97 76 193 HIGH 124.80 2574 Peterson, V M 30 06/08/97 69 147 MOD 149.75 2501 Bonaventure, T F 31 06/09/97 61 123 LOW 149.75 2552 Reberson, P F 32 06/10/97 67 151 MOD 149.75 2462 Almers, C F 34 06/12/97 66 152 HIGH 124.80 2563 Pitts, D M 34 06/14/97 73 154 LOW 124.80 2555 King, E M 35 06/14/97 70 173 MOD 149.75 2575 Quigley, M F 40 06/06/97 69 163 HIGH 124.80 2589 Wilcox, E F 41 06/17/97 67 141 HIGH 149.75 2523 Johnson, R F 43 06/17/97 63 137 MOD 149.75 2584 Takahashi, Y F 43 06/18/97 65 123 MOD 124.80 2571 Nunnelly, A F 44 06/19/97 66 140 HIGH 149.75 2578 Cameron, L M 47 06/20/97 72 173 MOD 124.80 2568 Eberhardt, S F 49 06/21/97 64 172 LOW 124.80 2539 LaMance, K M 51 06/22/97 71 158 LOW 124.80 2595 Warren, C M 54 06/15/97 71 183 MOD 149.75 2579 Underwood, K M 60 06/11/97 71 191 LOW 149.75 ; data work.before; input name $ 1-30; datalines; Mrs. Millicent Garrett Fawcett Miss Charlotte Despard Mrs. Emmeline Pankhurst Miss Sylvia Pankhurst ; data work.cltrials; input Name $ 1-11 Sex $ 13 Placebo $ 15-17 Cholesterol $ 22-24 Triglyc 26-28 uric 30-32 TestDate 34-42; datalines; johnson,R F YES 30 200 180 3.7 LaMance,K M YES 30 250 230 5.1 Eberhardt,S F NO 30 244 320 4.6 Nunnelly,A F YES 30 210 300 4.0 Quigley,M F NO 30 192 139 6.2 Cameron,L M YES 30 198 150 4.3 Underwood,K M NO 30 159 110 4.9 ; data work.company; input Name $ 1-22 Age 24-25 Sex $ 27 SSN $ 29-39; datalines; Morrison, Michael 32 M Rudelich, Herbert 39 M 029-46-9261 Vincent, Martina 34 F 074-53-9892 Benito, Gisela 32 F 228-88-9649 Sirignano, Emily 12 F 442-21-8075 Harbinger, Nicholas 36 M 446-93-2122 Phillipon, Marie-Odile 28 F 776-84-5391 Gunter, Thomas 27 M 929-75-0218 ; data work.credit; input Account $ 1-4 Name $ 6-22 Type $ 24 Transaction $ 26-31; datalines; 1118 ART CONTUCK D 57.69 2287 MICHAEL WINSTONE D 145.89 6201 MARY WATERS C 45.00 7821 MICHELLE STANTON A 304.45 6621 WALTER LUND C 234.76 1086 KATHERINE MORRY A 64.98 0556 LEE McDONALD D 70.82 7821 ELIZABETH WESTIN C 188.23 0265 JEFFREY DONALDSON C 78.90 1010 MARTIN LYNN D 150.55 ; data work.demog; input ID $ 1-4 Age 6-7 Sex $ 9 Date mmddyy8.; format date mmddyy8.; datalines; A001 21 m 05/22/75 A002 32 m 06/15/63 A003 24 f 08/17/72 A004 01/27/69 A005 44 f 02/24/52 A007 39 m 11/11/57 ; data work.diabetes; input ID $ 1-4 Sex $ 6 Age 8-9 Height 11-12 Weight 14-16 Pulse 18-20 FastGluc 22-24 PostGluc 26-28; datalines; 2304 F 16 61 102 100 568 625 1128 M 43 71 218 76 156 208 4425 F 48 66 162 80 244 322 1387 F 57 64 142 70 177 206 9012 F 39 63 157 68 257 318 6312 M 52 72 240 77 362 413 5438 F 42 62 168 83 247 304 3788 M 38 73 234 71 486 544 9125 F 56 64 159 70 166 215 3438 M 15 66 140 67 492 547 1274 F 50 65 153 70 193 271 3347 M 53 70 193 78 271 313 2486 F 63 65 157 70 152 224 1129 F 48 61 137 69 267 319 9723 M 52 75 219 65 348 403 8653 M 49 68 185 79 259 311 4451 M 54 71 196 81 373 431 3279 M 40 70 213 82 447 504 4759 F 60 68 164 71 155 215 6488 F 59 64 154 75 362 409 ; data work.europe; input Flight $ 1-3 @5 Date date7. @13 Depart time5. Orig $ 19-21 Dest $ 23-25 Miles 27-30 Mail 32-34 Freight 36-38 Boarded 40-42 Transferred 44-45 NonRevenue 47 Deplaned 49-51 Capacity 53-55 DayOfMonth 57-58 Revenue 60-65; format Date date7. Depart time5.; datalines; 821 04MAR99 9:31 LGA LON 3442 403 209 167 17 7 222 250 1 150634 271 04MAR99 11:40 LGA PAR 3856 492 308 146 8 3 163 250 1 156804 271 05MAR99 12:19 LGA PAR 3857 366 498 177 15 5 227 250 1 190098 821 06MAR99 14:56 LGA LON 3442 345 243 167 13 4 222 250 1 150634 821 07MAR99 13:17 LGA LON 3635 248 307 215 14 6 158 250 1 193930 271 07MAR99 9:31 LGA PAR 3442 353 205 155 18 7 172 250 2 166470 821 08MAR99 11:40 LGA LON 3856 391 395 186 8 1 114 250 2 167772 271 08MAR99 12:19 LGA PAR 3857 366 279 152 7 4 187 250 2 163248 821 09MAR99 14:56 LGA LON 3442 219 368 203 6 3 210 250 2 183106 271 09MAR99 13:17 LGA PAR 3635 357 282 159 15 4 191 250 2 170766 821 10MAR99 9:31 LGA LON 3442 389 479 188 8 6 211 250 3 169576 271 10MAR99 11:40 LGA PAR 3856 415 463 182 9 6 153 250 3 195468 622 03MAR99 12:19 LGA FRA 3857 296 414 180 16 4 200 250 3 187636 821 03MAR99 14:56 LGA LON 3442 448 282 151 17 4 172 250 3 143561 271 03MAR99 13:17 LGA PAR 3635 352 351 147 29 7 183 250 3 123456 219 04MAR99 9:31 LGA LON 3442 331 376 232 18 0 250 250 4 189065 387 04MAR99 11:40 LGA CPH 3856 395 217 81 21 1 103 250 4 196540 622 04MAR99 12:19 LGA FRA 3857 296 232 137 14 4 155 250 4 165456 821 04MAR99 14:56 LGA LON 3442 403 209 167 9 6 182 250 4 170766 271 04MAR99 13:17 LGA PAR 3635 492 308 146 13 4 163 250 4 125632 219 05MAR99 9:31 LGA LON 3442 485 267 160 4 3 167 250 5 197456 387 05MAR99 11:40 LGA CPH 3856 393 304 142 8 2 152 250 5 134561 622 05MAR99 12:19 LGA FRA 3857 340 311 185 11 3 199 250 5 125436 271 05MAR99 13:17 LGA PAR 3635 366 498 177 22 4 203 250 5 128972 219 06MAR99 9:31 LGA LON 3442 388 298 163 14 6 183 250 6 162343 821 06MAR99 14:56 LGA LON 3442 345 243 167 16 2 185 250 6 129560 219 07MAR99 9:31 LGA LON 3442 421 356 241 9 0 250 250 7 134520 387 07MAR99 11:40 LGA CPH 3856 546 204 131 5 6 142 250 7 135632 622 07MAR99 12:19 LGA FRA 3857 391 423 210 22 5 237 250 7 107865 821 07MAR99 14:56 LGA LON 3442 248 307 215 11 5 231 250 7 196736 271 07MAR99 13:17 LGA PAR 3635 353 205 155 21 4 180 250 7 153423 219 08MAR99 9:31 LGA LON 3442 447 299 183 11 3 197 250 8 106753 387 08MAR99 11:40 LGA CPH 3856 415 367 150 9 3 162 250 8 128564 622 08MAR99 12:19 LGA FRA 3857 346 . 176 5 6 187 250 8 178543 821 08MAR99 14:56 LGA LON 3442 391 395 186 11 5 202 250 8 125344 271 08MAR99 13:17 LGA PAR 3635 366 279 152 20 4 176 250 8 133345 219 09MAR99 9:31 LGA LON 3442 356 547 211 18 6 235 250 9 122766 387 09MAR99 11:40 LGA CPH 3856 363 297 128 14 3 145 250 9 134523 622 09MAR99 12:19 LGA FRA 3857 317 421 173 11 5 189 250 9 100987 821 09MAR99 14:56 LGA LON 3442 219 368 203 11 4 218 250 9 166543 271 09MAR99 13:17 LGA PAR 3635 357 282 159 18 5 182 250 9 126543 219 10MAR99 9:31 LGA LON 3442 272 370 167 7 7 181 250 10 198744 387 10MAR99 11:40 LGA CPH 3856 336 377 154 18 5 177 250 10 109885 622 10MAR99 12:19 LGA FRA 3857 272 363 129 12 6 147 250 10 134459 821 10MAR99 14:56 LGA LON 3442 389 479 188 5 4 197 250 10 129745 271 10MAR99 13:17 LGA PAR 3635 415 463 182 9 7 198 250 10 134976 ; data work.finance; input SSN $ 1-11 Name $ 13-24 Salary 26-30 +1 Date mmddyy6.; format date mmddyy8.; datalines; 074-53-9892 Vincent 35000 052297 776-84-5391 Phillipon 29750 121596 929-75-0218 Gunter 27500 043097 446-93-2122 Harbinger 33900 070896 228-88-9649 Benito 28000 030496 029-46-9261 Rudelich 35000 021595 442-21-8075 Sirignano 5000 112295 ; data work.fitclass; input Name $ weight1 weight2 weight3 weight4 weight5 weight6; datalines; Alicia 69.6 68.9 68.8 67.4 66.0 66.2 Betsy 52.6 52.6 51.7 50.4 49.8 49.1 Brenda 68.6 67.6 67.0 66.4 65.8 65.2 Carl 67.6 66.6 66.0 65.4 64.8 64.2 Carmela 63.6 62.5 61.9 61.4 60.8 58.2 David 70.6 69.8 69.2 68.4 67.8 67.0 ; data work.funddrive; input LastName $ 1-9 Qtr1 15-16 Qtr2 23-24 Qtr3 31-32 Qtr4 39-40; datalines; ADAMS 18 18 20 20 ALEXANDER 15 18 15 10 APPLE 25 25 25 25 ARTHUR 10 25 20 30 AVERY 15 15 15 15 BAREFOOT 20 20 20 20 BAUCOM 25 20 20 30 BLAIR 10 10 5 10 BLALOCK 5 10 10 15 BOSTIC 20 25 30 25 BRADLEY 12 16 14 18 BRADY 20 20 20 20 BROWN 18 18 18 18 BRYANT 16 18 20 18 BURNETTE 10 10 10 10 CHEUNG 30 30 30 30 LEHMAN 20 20 20 20 VALADEZ 14 18 40 25 ; data work.funddrv; input LastName $ 1-9 Qtr1 15-16 Qtr2 23-24 Qtr3 31-32 Qtr4 39-40; datalines; ADAMS 18 18 20 20 ALEXANDER 15 18 15 10 APPLE 25 25 25 25 ARTHUR 10 25 20 30 AVERY 15 15 15 15 BAREFOOT 20 20 20 20 BAUCOM 25 20 20 30 BLAIR 10 10 5 10 BLALOCK 5 10 10 15 BOSTIC 20 25 30 25 BRADLEY 12 16 14 18 BRADY 20 20 20 20 BROWN 18 18 18 18 BRYANT 16 18 20 18 BURNETTE 10 10 10 10 CHEUNG 30 30 30 30 LEHMAN 20 20 20 20 VALADEZ 14 18 40 25 ; data work.heart; input Patient $ 1-3 Sex 8 Survive $ 12-15 Shock $ 19-26 Arterial 31-33 Heart 38-40 Cardiac 45-47 Urinary 53-55; datalines; 203 1 SURV NONSHOCK 88 95 66 110 54 1 DIED HYPOVOL 83 183 95 0 664 2 SURV CARDIO 72 111 332 12 210 2 DIED BACTER 74 97 369 0 101 2 DIED NEURO 80 130 291 0 102 2 SURV OTHER 87 107 471 65 529 1 DIED CARDIO 103 106 217 15 524 2 DIED CARDIO 145 99 156 10 426 1 SURV OTHER 68 77 410 75 509 2 SURV OTHER 79 84 256 90 742 1 DIED HYPOVOL 100 54 135 0 609 2 DIED NONSHOCK 93 101 260 90 318 2 DIED OTHER 72 81 410 405 412 1 SURV BACTER 61 87 296 44 601 1 DIED BACTER 84 101 260 377 402 1 SURV CARDIO 88 137 312 75 98 2 SURV CARDIO 84 87 260 377 4 1 SURV HYPOVOL 81 149 406 200 50 2 SURV HYPOVOL 72 111 332 12 2 2 DIED OTHER 101 114 424 97 ; data work.insure; input ID $ 1-4 Name $ 6-19 Policy $ 21-25 Company $ 27-37 PctInsured 39-41 Total 43-49 BalanceDue 57-62; format balancedue 6.2; datalines; 2458 Murray, W 32668 MUTUALITY 100 98.64 0.00 2462 Almers, C 95824 RELIABLE 80 780.23 156.05 2501 Bonaventure, T 87795 A&R 80 47.38 9.48 2523 Johnson, R 39022 ACME 50 122.07 61.04 2539 LaMance, K 63265 PARNASSUS 50 87.35 43.68 2544 Jones, M 92478 ESSENTIAL 80 262.08 52.42 2552 Reberson, P 25530 USA INC. 60 518.53 207.41 2555 King, E 18744 ACME 80 135.97 27.19 2563 Pitts, D 60976 HOMELIFE 80 1554.12 310.82 2568 Eberhardt, S 81589 RURITAN 50 346.33 173.17 2571 Nunnelly, A 99120 EMPLOYERS 100 583.55 0.00 2572 Oberon, M 44544 ACME 100 4537.77 0.00 2574 Peterson, V 75986 FRED SMYTHE 60 569.99 228.00 2575 Quigley, M 97048 RELIABLE 50 198.01 99.01 2578 Cameron, L 42351 COVINGTON 50 222.82 111.41 2579 Underwood, K 14592 ESSENTIAL 100 541.64 0.00 2584 Takahashi, Y 54219 FRED SMYTHE 60 466.46 186.58 2586 Derber, B 74653 RELIABLE 60 590.28 236.11 2588 Ivan, H 83809 HOMELIFE 100 474.50 0.00 2589 Wilcox, E 94034 ACME 60 530.49 212.20 2595 Warren, C 20347 RELIABLE 60 411.11 164.44 ; data work.laguardia; input Flight $ 1-3 @5 Date date7. @14 Depart time5. Orig $ 22-24 Dest $ 28-30 Boarded 33-35 Transferred 38-39 Deplaned 42-44 Revenue 47-52; format Date date7. Depart time5.; datalines; 219 04MAR99 9:31 LGA LON 232 18 250 189065 219 05MAR99 9:31 LGA LON 160 4 167 197456 219 06MAR99 9:31 LGA LON 163 14 183 162343 219 07MAR99 9:31 LGA LON 241 9 250 134520 219 08MAR99 9:31 LGA LON 183 11 197 106753 219 09MAR99 9:31 LGA LON 211 18 235 122766 219 10MAR99 9:31 LGA LON 167 7 181 198744 271 04MAR99 11:40 LGA PAR 146 8 163 156804 271 05MAR99 12:19 LGA PAR 177 15 227 190098 271 07MAR99 9:31 LGA PAR 155 18 172 166470 271 08MAR99 12:19 LGA PAR 152 7 187 163248 271 09MAR99 13:17 LGA PAR 159 15 191 170766 271 10MAR99 11:40 LGA PAR 182 9 153 195468 271 03MAR99 13:17 LGA PAR 147 29 183 123456 271 04MAR99 13:17 LGA PAR 146 13 163 125632 271 05MAR99 13:17 LGA PAR 177 22 203 128972 271 07MAR99 13:17 LGA PAR 155 21 180 153423 271 08MAR99 13:17 LGA PAR 152 20 176 133345 271 09MAR99 13:17 LGA PAR 159 18 182 126543 271 10MAR99 13:17 LGA PAR 182 9 198 134976 387 04MAR99 11:40 LGA CPH 81 21 103 196540 387 05MAR99 11:40 LGA CPH 142 8 152 134561 387 07MAR99 11:40 LGA CPH 131 5 142 135632 387 08MAR99 11:40 LGA CPH 150 9 162 128564 387 09MAR99 11:40 LGA CPH 128 14 145 134523 387 10MAR99 11:40 LGA CPH 154 18 177 109885 622 03MAR99 12:19 LGA FRA 180 16 200 187636 622 04MAR99 12:19 LGA FRA 137 14 155 165456 622 05MAR99 12:19 LGA FRA 185 11 199 125436 622 07MAR99 12:19 LGA FRA 210 22 237 107865 622 08MAR99 12:19 LGA FRA 176 5 187 178543 622 09MAR99 12:19 LGA FRA 173 11 189 100987 622 10MAR99 12:19 LGA FRA 129 12 147 134459 821 04MAR99 9:31 LGA LON 167 17 222 150634 821 06MAR99 14:56 LGA LON 167 13 222 150634 821 07MAR99 13:17 LGA LON 215 14 158 193930 821 08MAR99 11:40 LGA LON 186 8 114 167772 821 09MAR99 14:56 LGA LON 203 6 210 183106 821 10MAR99 9:31 LGA LON 188 8 211 169576 821 03MAR99 14:56 LGA LON 151 17 172 143561 821 04MAR99 14:56 LGA LON 167 9 182 170766 821 06MAR99 14:56 LGA LON 167 16 185 129560 821 07MAR99 14:56 LGA LON 215 11 231 196736 821 08MAR99 14:56 LGA LON 186 11 202 125344 821 09MAR99 14:56 LGA LON 203 11 218 166543 821 10MAR99 14:56 LGA LON 188 5 197 129745 ; data work.loans; input Account $ 1-8 Amount 10-15 Rate 17-21 Months 23-25 Payment 27-32; format amount dollar8. rate percent8.2 payment dollar10.2; datalines; 101-1092 22000 .10 60 467.43 101-1731 114000 .095 360 958.57 101-1289 10000 .105 36 325.02 101-3144 3500 .105 12 308.52 103-1135 8700 .105 24 403.47 103-1994 18500 .10 60 393.07 103-2335 5000 .105 48 128.02 103-3864 87500 .095 360 735.75 103-3891 30000 .0975 360 257.75 ; data work.measure; input ID $ 1-4 Height 6-7 Weight 9-11; datalines; 1129 61 137 1387 64 142 2304 61 102 5438 62 168 6488 64 154 9012 63 157 ; data work.newloans; input Account $ 1-8 Amount 10-15 Rate 17-21 Months 23-25 Payment 27-32; format amount dollar8. rate percent8.2 payment dollar10.2; datalines; 101-1092 22000 .10 60 467.43 101-1731 114000 .095 360 958.57 101-1289 10000 .105 36 325.02 101-3144 3500 .105 12 308.52 103-1135 8700 .105 24 403.47 103-1994 18500 .10 60 393.07 103-2335 5000 .105 48 128.02 103-3864 87500 .095 360 735.75 103-3891 30000 .0975 360 257.75 ; data work.newadmit; input ID $ 1-4 Name $ 6-19 Sex $ 21 Age 23-24 Date 26-27 Height 29-30 Weight 32-34 ActLevel $ 36-39 Fee 41-46 MeterHgt 48-54 KgWgt 56-62; format fee 6.2 meterhgt 7.5 kgwgt 7.4; datalines; 2458 Murray, W M 27 1 72 168 HIGH 85.20 1.82880 76.3636 2462 Almers, C F 34 3 66 152 HIGH 124.80 1.67640 69.0909 2501 Bonaventure, T F 31 17 61 123 LOW 149.75 1.54940 55.9091 2523 Johnson, R F 43 31 63 137 MOD 149.75 1.60020 62.2727 2539 LaMance, K M 51 4 71 158 LOW 124.80 1.80340 71.8182 2544 Jones, M M 29 6 76 193 HIGH 124.80 1.93040 87.7273 2552 Reberson, P F 32 9 67 151 MOD 149.75 1.70180 68.6364 2555 King, E M 35 13 70 173 MOD 149.75 1.77800 78.6364 2563 Pitts, D M 34 22 73 154 LOW 124.80 1.85420 70.0000 2568 Eberhardt, S F 49 27 64 172 LOW 124.80 1.62560 78.1818 2571 Nunnelly, A F 44 19 66 140 HIGH 149.75 1.67640 63.6364 2572 Oberon, M F 28 17 62 118 LOW 85.20 1.57480 53.6364 2574 Peterson, V M 30 6 69 147 MOD 149.75 1.75260 66.8182 2575 Quigley, M F 40 8 69 163 HIGH 124.80 1.75260 74.0909 2578 Cameron, L M 47 5 72 173 MOD 124.80 1.82880 78.6364 2579 Underwood, K M 60 22 71 191 LOW 149.75 1.80340 86.8182 2584 Takahashi, Y F 43 29 65 123 MOD 124.80 1.65100 55.9091 2586 Derber, B M 25 23 75 188 HIGH 85.20 1.90500 85.4545 2588 Ivan, H F 22 20 63 139 LOW 85.20 1.60020 63.1818 2589 Wilcox, E F 41 16 67 141 HIGH 149.75 1.70180 64.0909 2595 Warren, C M 54 7 71 183 MOD 149.75 1.80340 83.1818 ; data work.patients; input ID $ 1-4 Sex $ 6 Age 8-9; datalines; 1129 F 48 1837 F 57 2304 F 16 2486 F 63 4759 F 60 5438 F 42 6488 F 59 9012 F 39 9125 F 56 ; data work.records; input Account $ 1-8 Amount 10-14 Rate 16-20 Months 22-24 Payment 26-31 Code $ 33; format amount dollar8. rate percent8.2 payment dollar7.2; datalines; 101-1092 22000 .10 60 467.43 1 101-1731 14000 .095 360 958.57 2 101-1289 10000 .105 36 325.02 2 101-3144 3500 .105 12 308.52 1 103-1135 8700 .105 24 403.47 1 103-1994 18500 .10 60 393.07 2 103-2335 5000 .105 48 128.02 1 103-3864 87500 .095 360 735.75 1 103-3891 30000 .0975 360 257.75 2 ; run; data work.repertory; input Play $ 1-19 Role $ 21-37 SSN $ 39-49 @51 Date mmddyy6.; format date mmddyy8.; datalines; The Glass Menagerie Jim O'Connor 029-46-9261 092397 The Dear Departed Henry Slater 029-46-9261 112297 No Exit Estelle 074-53-9892 071197 Happy Days Winnie 074-53-9892 081397 The Dear Departed Mrs. Jordan 074-53-9892 112297 The Glass Menagerie Amanda Wingfield 228-88-9649 092397 The Dear Departed Mrs. Slater 228-88-9649 112297 The Dear Departed Victoria Slater 442-21-8075 112297 No Exit Garcin 446-93-2122 071197 Happy Days Willie 446-93-2122 081397 The Dear Departed Ben Jordan 446-93-2122 112297 No Exit Inez 776-84-5391 071197 The Glass Menagerie Laura Wingfield 776-84-5391 092397 No Exit Valet 929-75-0218 071197 The Glass Menagerie Tom Wingfield 929-75-0218 092397 The Dear Departed Abel Merryweather 929-75-0218 112297 ; data work.reps; attrib IDnum length=$4; attrib LastName length=$10; attrib FirstName length=$8; attrib City length=$10; attrib State length=$2; attrib Sex length=$1; attrib JobCode length=$3; attrib Salary length=8 format=8.2; attrib Birth length=8 format=DATE7.; attrib Hired length=8 format=DATE7.; attrib HomePhone length=$12; infile datalines dsd; input IDnum LastName FirstName City State Sex JobCode Salary Birth Hired HomePhone ; datalines4; 1269,CASTON,FRANKLIN,STAMFORD,CT,M,NA1,41690,126,7640,203/781-3335 1935,FERNANDEZ,KATRINA,BRIDGEPORT,CT,,NA2,51081,-6485,3579,203/675-2962 1417,NEWKIRK,WILLIAM,PATERSON,NJ,",",NA2,52270,-2741,6278,201/732-6611 1839,NORRIS,DIANE,NEW YORK,YN,F,NA1,43433,-395,7857,718/384-1767 1111,RHODES,JEREMY,PRINCETON,NJ,M,NA1,40586,563,7612,201/812-1837 1352,RIVERS,SIMON,NEW YORK,NY,M,NA2,5379.8,-4044,5405,718/383-3345 1332,STEPHENSON,ADAM,BRIDGEPORT,CT,M,NA1,42178,-468,7097,203/675-1497 1443,WELLS,AGNES,STAMFORD,CT,F,NA1,422.74,-1137,7183,203/781-5546 ;;;; run; data work.sch; input Program $ 1-21 Producer $ 23-26 @28 AirDate mmddyy10.; format AirDate mmddyy8.; datalines; All Things Considered NPR 04/12/2000 BBC World BBC 04/04/2000 Morning Edition NPR 04/13/2000 River to River NPR 04/01/2000 World Cafe WXPN 04/08/2000 Talk of the Town NPR 04/04/2000 Classical Music NPR 04/08/2000 Symphony Live NPR 04/01/2000 All Things Considered NPR 04/19/2000 Morning Edition NPR 04/14/2000 BBC World BBC 04/06/2000 Morning Edition NPR 04/17/2000 BBC World BBC 04/07/2000 Morning Edition NPR 04/18/2000 BBC World BBC 04/10/2000 Morning Edition NPR 04/20/2000 Symphony Live NPR 04/16/2000 World Cafe WXPN 04/08/2000 ; data work.stress; input ID $ 1-4 Name $ 6-19 RestHR 23-24 MaxHR 29-31 RecHR 35-37 TimeMin 43-44 TimeSec 51-52 Tolerance $ 58; datalines; 2458 Murray, W 72 185 128 12 38 D 2462 Almers, C 68 171 133 10 5 I 2501 Bonaventure, T 78 177 139 11 13 I 2523 Johnson, R 69 162 114 9 42 S 2539 LaMance, K 75 168 141 11 46 D 2544 Jones, M 79 187 136 12 26 N 2552 Reberson, P 69 158 139 15 41 D 2555 King, E 70 167 122 13 13 I 2563 Pitts, D 71 159 116 10 22 S 2568 Eberhardt, S 72 182 122 16 49 N 2571 Nunnelly, A 65 181 141 15 2 I 2572 Oberon, M 74 177 138 12 11 D 2574 Peterson, V 80 164 137 14 9 D 2575 Quigley, M 74 152 113 11 26 I 2578 Cameron, L 75 158 108 14 27 I 2579 Underwood, K 72 165 127 13 19 S 2584 Takahashi, Y 76 163 135 16 7 D 2586 Derber, B 68 176 119 17 35 N 2588 Ivan, H 70 182 126 15 41 N 2589 Wilcox, E 78 189 138 14 57 I 2595 Warren, C 77 170 136 12 10 S ; data work.stress2; input ID $ 1-4 Name $ 6-19 RestHR 23-24 MaxHR 29-31 RecHR 35-37 TimeMin 43-44 TimeSec 51-52 Tolerance $ 58; datalines; 2458 Murray, W 72 185 128 12 38 D 2462 Almers, C 68 171 133 10 5 I 2501 Bonaventure, T 78 177 139 11 13 I 2523 Johnson, R 69 162 114 9 42 S 2539 LaMance, K 75 168 141 11 46 D 2544 Jones, M 79 187 136 12 26 N 2552 Reberson, P 69 158 139 15 41 D 2555 King, E 70 167 122 13 13 I 2563 Pitts, D 71 159 116 10 22 S 2568 Eberhardt, S 72 182 122 16 49 N 2571 Nunnelly, A 65 181 141 15 2 I 2572 Oberon, M 74 177 138 12 11 D 2574 Peterson, V 80 164 137 14 9 D 2575 Quigley, M 74 152 113 11 26 I 2578 Cameron, L 75 158 108 14 27 I 2579 Underwood, K 72 165 127 13 19 S 2584 Takahashi, Y 76 163 135 16 7 D 2586 Derber, B 68 176 119 17 35 N 2588 Ivan, H 70 182 126 15 41 N 2589 Wilcox, E 78 189 138 14 57 I 2595 Warren, C 77 170 136 12 10 S ; data work.stress98; input ID $ 1-4 Name $ 8-19 RestHR 25-26 MaxHR 33-35 RecHR 41-43 TimeMin 51-52 TimeSec 61-62 Tolerance $ 70 Year 75-78; datalines; 2458 Murray, W 72 185 128 12 38 D 1998 2462 Almers, C 68 171 133 10 5 I 1998 2523 Johnson, R 69 162 114 9 42 S 1998 2539 LaMance, K 75 168 141 11 46 D 1998 2555 King, E 70 167 122 13 13 I 1998 2563 Pitts, D 71 159 116 10 22 S 1998 2572 Oberon, M 74 177 138 12 11 D 1998 2574 Peterson, V 80 164 137 14 9 D 1998 2575 Quigley, M 74 152 113 11 26 I 1998 2584 Takahashi, Y 76 163 135 16 7 D 1998 2586 Derber, B 68 176 119 17 35 N 1998 2589 Wilcox, E 78 189 138 14 57 I 1998 ; data work.stress99; input ID $ 1-4 Name $ 7-18 RestHR 25-26 MaxHR 32-34 RecHR 39-41 TimeMin 48-49 TimeSec 57-58 Tolerance $ 65 Year 70-73; datalines; 2501 Bonaventure, T 78 177 139 11 13 I 1999 2544 Jones, M 79 187 136 12 26 N 1999 2552 Reberson, P 69 158 139 15 41 D 1999 2568 Eberhardt, S 72 182 122 16 49 N 1999 2571 Nunnelly, A 65 181 141 15 2 I 1999 2578 Cameron, L 75 158 108 14 27 I 1999 2579 Underwood, K 72 165 127 13 19 S 1999 2588 Ivan, H 70 182 126 15 41 N 1999 2595 Warren, C 77 170 136 12 10 S 1999 ; data work.stresstest; input ID $ 1-4 Name $ 7-20 RestHR 25-26 MaxHR 32-34 RecHR 39-41 TimeMin 48-49 TimeSec 57-58 Tolerance $ 65 @70 Date mmddyy8.; format date mmddyy8.; datalines; 72 185 128 12 38 D 05/22/97 2462 Almers, C 68 171 133 10 5 I 05/22/97 2501 Bonaventure, T 78 177 139 11 13 I 05/23/97 2578 Cameron, L . 158 108 14 27 I 05/23/97 2586 Derber, B 68 176 119 17 35 N 05/23/97 2568 Eberhardt, S 72 182 122 16 49 05/24/97 2588 Ivan, H 70 182 126 15 41 N 05/24/97 2523 Johnson, R 69 162 114 9 42 S 05/24/97 2544 Jones, M 79 187 . 12 26 N 05/25/97 2555 King, E 70 167 122 13 13 I 05/25/97 2539 LaMance, K 75 168 141 11 46 D 05/26/97 2571 Nunnelly, A 65 181 141 15 2 I 05/26/97 2572 Oberon, M 74 177 138 12 11 D 05/27/97 2574 Peterson, V 80 164 137 14 9 D 05/27/97 2563 Pitts, D 71 159 116 10 22 S 05/28/97 2575 Quigley, M 74 152 113 11 26 I 05/28/97 2552 Reberson, P 69 158 139 15 41 D 05/29/97 2584 Takahashi, Y 76 163 135 16 7 D 05/29/97 2579 Underwood, K 72 165 127 13 19 S 05/30/97 2595 Warren, C 77 170 136 12 10 S 05/30/97 2589 Wilcox, E 78 189 138 14 57 I 05/31/97 ; data work.survey; input FirstName $ 1-8 Item1 10 Item2 13 Item3 16 Item4 19 Item5 22 Item6 25 Item7 28 Item8 31 Item9 34 Item10 37 Item11 40 Item12 43 Item13 46 Item14 49 Item15 52 Item16 55 Item17 58 Item18 61; datalines; Alicia 4 3 5 4 3 4 1 2 2 3 1 2 2 3 1 1 2 3 Bernard 2 1 4 3 1 2 5 4 5 2 5 3 4 5 5 3 4 5 Betsy 5 3 4 5 5 4 4 4 3 5 4 3 4 2 3 5 2 3 Carmela 4 5 4 2 3 5 2 1 2 3 2 3 1 2 3 1 4 2 ; data work.talent1; input LastName $ 1-13 FirstName $ 15-22 Address1 $ 24-44 Address2 $ 46-61 @63 Rate dollar6.; format rate dollar6.; datalines; SAMUELS LAWRENCE 123 PEACHBLOSSOM LANE WILLIAMS, NJ $1,200 INGER STEVEN 4 LAKEVIEW DR RIVERTON, NJ $2,400 NARANJA IGNES 666 TORROBA CENTERVILLE, NJ $2,400 LEBEAU MARTINE 4434 CENTER AVE. JEFFERSON, NJ $2,100 OPULEE FELICIA 5 QUINCE BLVD KNEELAND, NJ $3,600 EATON AARON 75 SORRELL LAKE DRIVE MERCED, NJ $1,800 NEWTON ISAH 8 HOLLY LANE RIVERTON, NJ $2,400 WILLOBY CHESTER 900 STAR ROUTE DRIVE WINTSON, NJ $2,700 HOLLOWAY RANDY 67 H STREET RIVERTON, NJ $3,600 JACOBY WILMA 789A DEPARTURE ROAD CHESAPEAKE, NJ $1,200 BUXTER JEROME 127 SILT STREET HILLSBORO, NJ $2,700 HARGROVE BRADLEY 5721 INVERNESS LANE CANTON, NJ $1,800 GARDE OLGA 45 FIFTH STREET CANTON, NJ $2,400 RUFFLE ROSE 3 FOIL AVE MOUNTAINVIEW, NJ $2,700 TURLINGTON BETTY 090 JICAMA STREET WASHINGTON, NJ $2,100 THORNER CHARLES 1111 TELEGRAPH AVE TAYLOR, NJ $2,700 BRIETENBERGER WALDO 6 HIGHLAND BLVD STANTON, NJ $2,400 WESTLEY KIP 868 MESA DRIVE GLENVIEW, NJ $2,700 DORTON DAVID 7 OVERLAND ROAD JEFFERSON, NJ $2,100 SPECTOR TERRI 8 FILDEN CIRCLE STANFORD, NJ $2,400 NOME HORACE 6 OAKTREE LANE PITTSBORO, NJ $2,400 HOLDEN RHETT 89 SPOONS DRIVE HOLDON, NJ $2,700 LAKER DORIS 80 SETTING CIRCLE HOLDON, NJ $2,700 SPECTRUM TERRI 8 HIDDEN CIRCLE EDGETON, NJ $2,400 ; data work.talent2; input Agency $ 1-20 Comment $ 22-51; datalines; TALENT TALENT TALENT southern accent GEORGE STICKS industrial UNIVERSAL directing,speaks spanish HORIZONS commercials,french accent SYCAMORE mime award winner GOLDEN GUILD GOLDEN GUILD radio broadcasting,dialects ACTORS SQUARE british accent,commercials LAURELS producer,writer ARTS TALENT FINDERS film ALL STARS stage,directing,commercials ALL STARS sports casting ALL STARS stuntman,speaks french UNLIMITED film STARS AND STRIPES age range 30-45 SETTINGS extensive dp video training STARS AND STRIPES rodeo UNIVERSAL LIGHTS speaks spanish,several accents MODELS AND MAGIC modeling,singing,mostly stage HORIZONS HARDY STELSON newscaster,ex dj AKA TALENT stage only MODELS AND MAGIC modeling,singing,stage ; data work.talent3; input ID $ 1-4 Phone 6-12 @14 LastHired date9. @24 BirthDate date9. Height $ 34-35 Month 37-38 Day 40-41; format lasthired birthdate date9.; datalines; 327M 5553489 08APR2000 25APR1978 69 4 8 102M 5556012 20AUG1999 16MAR1955 70 8 20 131F 5556781 16MAY1999 10SEP1976 64 6 25 709F 5554023 25JUN1999 08JAN1962 69 9 17 056F 5559909 17SEP1999 31JAN1930 59 12 10 287M 5557024 10DEC1999 14JUL1969 78 11 23 097F 5557045 23NOV1999 17AUG1972 68 11 12 070M 5555602 12NOV1999 14FEB1946 71 3 27 217M 5558114 27MAR2000 19MAY1963 71 7 18 118F 5559100 11OCT1999 06OCT1977 66 12 2 187M 5553688 18JUL1999 22MAR1925 76 1 7 035M 5555131 02DEC1999 23JUN1974 70 12 6 254F 5554950 07JAN2000 27FEB1940 63 8 25 167F 5558333 06DEC1999 27OCT1969 69 5 22 093F 5552525 25AUG1999 05NOV1963 57 2 25 261M 5557831 22MAY1999 01NOV1965 70 11 15 088M 5551006 25FEB2000 28MAY1950 69 9 17 134M 5559945 15NOV1999 16AUG1959 73 11 1 207M 5556563 17SEP1999 15APR1947 67 11 25 158F 5555613 01NOV1999 10JAN1971 65 10 28 065M 5552709 04DEC1999 23JUL1964 60 9 30 288M 5551856 25NOV1999 01JUL1965 73 2 22 134F 5554442 28OCT1999 18SEP1979 69 5 5 025F 5552442 30SEP1999 07MAY1971 65 10 15 ; data work.talent; merge work.talent1 work.talent2 work.talent3; format rate dollar6. lasthired birthdate date9.; run; data work.therapy; input Date $ 1-7 AerClass 14-15 WalkJogRun 22-24 Swim 30-31; datalines; JAN1999 56 78 14 FEB1999 32 109 19 MAR1999 35 106 22 APR1999 47 115 24 MAY1999 55 121 31 JUN1999 61 114 67 JUL1999 67 102 72 AUG1999 64 76 77 SEP1999 78 77 54 OCT1999 81 62 47 NOV1999 84 31 52 DEC1999 102 44 55 JAN2000 37 91 83 FEB2000 41 102 27 MAR2000 52 98 19 APR2000 61 118 22 MAY2000 49 88 29 JUN2000 24 101 54 JUL2000 45 91 69 AUG2000 63 65 53 SEP2000 60 49 68 OCT2000 78 70 41 NOV2000 82 44 58 DEC2000 93 57 47 ; data work.therapy1999; input Month $ 1-2 Year 10-13 AerClass 20-21 WalkJogRun 29-31 Swim 37-38; datalines; 01 1999 26 78 14 02 1999 32 109 19 03 1999 15 106 22 04 1999 47 115 24 05 1999 95 121 31 06 1999 61 114 67 07 1999 67 102 72 08 1999 24 76 77 09 1999 78 77 54 10 1999 81 62 47 11 1999 84 31 52 12 1999 92 44 55 ; data work.therapy2000; input Month $ 1-2 Year 10-13 AerClass 20-21 WalkJogRun 29-31 Swim 37-38; datalines; 01 2000 37 91 83 02 2000 41 102 27 03 2000 52 98 19 04 2000 61 118 22 05 2000 49 88 29 06 2000 24 101 54 07 2000 45 91 69 08 2000 63 65 53 09 2000 60 49 68 10 2000 78 70 41 11 2000 82 44 58 12 2000 93 57 47 ; data work.totals2000; input Month $ 1-2 Therapy 11-13 NewAdmit 23-25 Treadmill 35-36; datalines; 01 211 27 11 02 210 63 43 03 179 11 2 04 224 52 36 05 134 76 57 06 249 83 66 07 185 101 68 08 211 49 34 09 147 124 87 10 159 131 89 11 124 72 56 12 157 96 29 ; data work.usa; input Dept $ 1-5 WageCat $ 7 WageRate 9-15 Manager $ 17-23 JobType 25-27; datalines; ADM10 S 3392.50 Coxe 3 ADM10 S 3420.00 Coxe 50 ADM10 S 6862.50 Coxe 50 ADM10 H 13.65 Coxe 240 ADM20 S 4522.50 Coxe 240 ADM20 S 2960.00 Delgado 240 ADM20 S 5260.00 Delgado 240 ADM20 S 1572.50 Delgado 420 ADM30 S 3819.20 Delgado 420 ADM30 S 1813.30 Delgado 440 CAM10 S 6855.90 Overby 1 CAM10 S 4045.80 Overby 5 CAM20 S 4480.50 Overby 10 ADM10 S 5910.80 Overby 20 CAM10 S 9073.80 Overby 20 ; data work.visit; input ID $ 1-4 Visit $ 6-7 SysBP 8-10 DiasBP 12-13 Weight 15-17 Date mmddyy8.; format date mmddyy8.; datalines; A001 1 140 85 195 11/05/98 A001 2 138 90 198 10/13/98 A001 3 145 95 200 07/04/98 A002 1 121 75 168 04/14/98 A003 1 118 68 125 08/12/98 A003 2 112 65 123 08/21/98 A004 1 143 86 204 03/30/98 A005 1 132 76 174 02/27/98 A005 2 132 78 175 07/11/98 A005 3 134 78 176 04/16/98 A008 1 126 80 182 05/22/98 ;