Add plotindividualr2.R