R Programming homework