code for R programming course