loops - 在 Mathematica 中，我们如何将循环生成的许多图合并为一个图？

Question

我想可视化 x^n 形式的函数，使得 n=1,2,...,10。 我希望这些 n 值由循环生成，然后将函数绘制为 绘制 [{x^n},{x,0,100}] 并将绘图存储在数组中。然后我希望所有这些数组都显示在单个图中。我尝试使用 Show 函数来执行此操作，但没有太多有用的结果。另外，如果您还可以告诉我如何为所有组合图设置不同的颜色并显示图例。

Answer 1

你能再澄清一下你想要什么吗？具体来说，为什么 Show 不适合您？

组合图就是 Show适用于:

Show[Table[
  Plot[x^n, {x, 0, 100}, PlotStyle -> ColorData[1][n]], {n, 10}], 
 PlotRange -> {All, 10^14}]

(我在这里指定了 PlotRange，因为每个图都有不同的自动选择的图范围。)

Plot 还可以直接一次绘制多个函数:

Plot[Evaluate[Table[x^n, {n, 10}]], {x, 0, 100}]

(在第一个示例中，我使用 ColorData 来模仿与第二个示例中自动使用的完全相同的颜色...但是您可以使用您想要的任何颜色，例如 Hue[RandomReal[]] .)