1. Download the data from HRS

Click on this [link] to get the data (https://hrsdata.isr.umich.edu/data-products/rand-hrs-longitudinal-file-2018)

#Get the STATA version.
HRS <- read.dta("randhrs1992_2018v1.dta")

2. Change the variable names

3. Adjust variables by inflation

4. Creating new variables