Update Tues.IntroductionR.r