wolfram-mathematica - Mathematica 循环遍历一个单元格

Question

在mathematica 中，可以使用类似于其他编程语言的单元格For或在单元格内编写循环。While为了迭代地运行一个单元块，我能想到的最好方法是在一个单独的数学笔记本中编写循环并调用NotebookOpen; SelectionEvaluate. 有没有办法在不创建额外的笔记本文件的情况下迭代地运行一个单元块？

谢谢

Answer 1

也许您正在寻找Module？

doTheLoop[] :=
  Module[{a, i},
    a = {};
    For[i=1, i < 1000, i++, If[PrimeQ[i], AppendTo[a, i]]];
    a
  ]

调用子程序doTheLoop[]

但是，通常循环不是Mathematica的方式。