R codes for TheElementsofStatisticalLearning