Course project for R cleaning