r语言完成泊松分布的仿真作业