r project 1 solution page