我们如何将循环生成的多个Plots组合成Mathematica中的一个Plot？

Question

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

Answer 1

你能澄清一点你想要的吗？具体来说,为什么Show 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[]].)