用 matlaB编程,结合元胞自动机模拟沙漏模型