start filling out Do It In R section