This is the R Programming assignment finished by Yuying L.