Create lesson3.r