Repdata Assign1 20141019