questions1&2

worked on second question
but R doesn't respond any more