4.R语言对布丰投针(蒲丰投针)实验进行模拟和动态可视化