R class day 1 slides