/*************Lab Assignment - Day 2***************** * Created on: January 11, 2004 * Created by: Meghan Warren * Answer Key for lab assignment 2 *****************************************************/ *1. Input the following SES_BP2 data; data SES_BP2; infile datalines; input id sex $ age sbp educ inc; datalines; 8 M 31 120 16 34 9 F 46 152 12 21 10 F 52 135 22 78 11 F 37 131 11 64 12 M 24 161 18 19 13 F 51 122 12 99 ; run; title 'Lab Assignment 2 data'; *checking data that is input; proc print data = SES_BP2; run; proc contents data = SES_BP2; run;

data temp1 (label = 'SES_BP2'); /*4. label the entire data set SES_BP2*/ set SES_BP2; *2. Create/generate a new variable called "HT", make it equal to one if SBP is greater than 130, and zero otherwise; if SBP gt 130 then HT = 1; else HT = 0; *3. Label the variables; label id = 'Subject ID' sex = 'Sex of Subject' age = 'Age at Interview' SBP = 'Sytolic Blood Pressure' EDUC = 'Educational Attainment' inc = 'Hohusehold Income/annum' HT = 'Hypertensive (0,1)'; run; title2 'Data set changed with labels and hypertension'; proc print data = temp1 label; /*using the label option in the proc print will show the labels you created*/ run; proc contents data = temp1; run; *Create subsets of:

1. 2. 3. 4.

ID equals 8,9, or 10 Only females Age is less than 50 and education is greater than 12 All non-hypertensives;

*ID equals 8, 9, and 10; data id_sub; set temp1; if id in (8,9,10); run; title2 'Includes only ID 8, 9, or 10'; proc print data = id_sub label; run; *Only females; data females; set temp1; where sex = 'F'; /*you can use if or where interchangeably to subset you data set*/ run; title2 'Includes only females'; proc print data = females label; run; *Age is les than 50 and education is greater than 12; data age_educ; set temp1; if age lt 50 and educ > 12; run; title2 'Includes age less than 50 and educational attainment greater than 12'; proc print data = age_educ label; run; *Non-hypertensives; data non_ht; set temp1; if ht = 0; run; title2 'Includes non-hypertensives'; proc print data = non_ht label; run;