Course Project R Code V 1.1 19-Dec-2014