Add R code for income + readme edits