capture log close
log using "socy699c-hw2-change.smcl", replace smcl

/* Using generate */
generate age1=age
generate age2=age^2
generate educ1=educ/10
generate sociability=round(((28-(socrel+socommun+socfrend+socbar))/24)*100,.1)
format sociability %9.1f


/* Using replace */
replace age1=1 if age>=18 & age<=31
replace age1=2 if age>=32 & age<=43
replace age1=3 if age>=44 & age<=59
replace age1=4 if age>=60 & age<=89

/* Using the inrange function
replace age1=1 if inrange(age,18,31)
replace age1=2 if inrange(age,32,43)
replace age1=3 if inrange(age,44,59)
replace age1=4 if inrange(age,60,89)
*/

/* Using recode */
#delimit ;
recode age (18/31=1 "18-31")
           (32/43=2 "32-43")
           (44/59=3 "44-59")
           (60/89=4 "60-89"), gen(age3);
#delimit cr

/* Add labels */
label data "Source: General Social Survey, 1972-2010"

label variable age1        "Respondent Age (quartiles)"
label variable age2        "Respondent Age-squared"
label variable educ1       "Respondent Education Divided by 10"
label variable sociability "Sociability Scale"

label define age1 1 "18-31"  2 "32-43"  3 "44-59"  4 "60-89"
label values age1 age

/* Data annotation */
describe
note: I have learned about examining and changing data.
note age2: To account for non-linearity age2 is equal to age^2

/* Cleaning up */
compress
rename age2 agesqr
rename age3 age2

move age1         educ
move age2         educ
move agesqr       educ
move educ1        sex
move sociability socrel

drop if inlist(year, 1972, 1973, 1976, 1980, 1984, 1987)
drop age2


/* Save the data */
save socy699c-data.dta, replace

log close