Mathematica 9中Do循环内输出被自动抑制，如何解除抑制？

Mathematica的Do循环默认会抑制循环体内所有表达式的输出，仅返回Null，这就是你运行代码后看不到图像的原因。要在循环内部实时显示Plot图像，可采用以下方法：

• 用Print[]包裹Plot语句，强制输出内容：

Do[n = i + 1; Print[Plot[Sin[n x], {x, 0, 2 Pi}]], {i, Range[0, 5, 1]}]

运行这段修改后的代码，每次循环都会即时显示对应的正弦曲线图像，满足你在循环内显示输出的需求。

内容的提问来源于stack exchange，提问作者Kim