finished all in R Programming Course 004