Exelesson3.R