Made annotations to predictfunction.R indicating how it the code works.