Rprog-Assign1-Data