R follow along with Open Intro to Stats