Loops 在Mathematica中，如何将一个循环生成的多个绘图合并为一个绘图？

我想可视化一个x^n形式的函数，使得n=1，2，…，10。 我希望这些n值由循环生成，然后将函数绘制为

---

绘图[{x^n}，{x，0100}]，并将绘图存储在数组中。然后我希望所有这些数组都显示在一个绘图中。我尝试使用Show函数来实现这一点，但没有得到多少有用的结果。另外，如果您还可以告诉我如何为所有组合的绘图设置不同的颜色，以及如何显示图例。

您能进一步说明您想要什么吗？具体来说，为什么不为你展示作品

组合图的目的是：

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

（我在这里指定了一个，因为每个绘图都有不同的自动选择绘图范围。）

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

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

---

（在第一个示例中，我曾经模拟与第二个示例中自动使用的颜色完全相同的颜色…但是您可以使用任何您想要的颜色，例如

Hue[RandomReal[]

）

谢谢。这就是我想要的。我对数学很陌生。所以我不知道很多事情：）再次感谢。