updated to show all R-code