initialize R code for data product course