quiz 4 for r programming and getting and cleaning data