R学习之统计实验(一)--电梯问题（R语言编程）-----数模