关于mathematica绘图,怎样在一个图里画多于100个函数图象!

要看情况：1.如果这100个函数都是同一类型的,并且能找到它们的变化规律的话,可以用Table函数生成.比如这100个函数都是幂函数,且幂次程等差数列规律升高,即x、x^2、x^3、x^4、x^5.x^100,那么可以用下面语句完成这100...谢谢您！我要输的函数是同一类型，是y=ax-(x/a)，然后一个一个递加，不知道这样的可以用table函数吗？？可以的.比如说a值从1到100的话，就可以这样写语句：Plot[Table[a*x-x/a,{a,1,100,1}],{x,-1,1}]我给你画了一下a值从1到10的情况，图片在最后Table函数的语法是Table[f(i),{i,imin,imax,inc}]，即Table函数将给出随着i从imin每次增长inc到imax的所有的f(i)，当inc为1时可以省略不写补充：不清楚你为什么要画那么多，如果你是要观察随着a值的变化，函数图像有什么变化的话，可以用Manipulate函数，如下：Manipulate[Plot[a*x-x/a,{x,-1,1},PlotRange->1],{a,1,100}]你可以试试看太谢谢了！还想再问一下，比如我想画把1/i + i*x 和 1/i - i*x 画在一起，可是一个要取{i，0,100}，另一个要取{i，-100,0}这要怎么写语句？谢谢您！这要用到Show函数不过i是不能取0的，因为分母的位置有i，100的话太大，我给你写一下{i,1,10}和{i,-10,-1}的语句，具体数据你可以自己修改一下：Show[ Plot[Table[1/i + i x, {i, 1, 10}], {x, -1, 1}], Plot[Table[1/i - i x, {i, -10, -1}], {x, -1, 1}] ]太太太谢谢您了！还要问您一下，mathematica可以设定y轴的取值范围吗？？？上面的图都是它自动匹配的，可以自己设定吗？可以用PlotRange选项命令，比如：Plot[x^3,{x,-1,1},PlotRange->2]这里PlotRange->2的意思就是y轴的取值范围为{-2,2}，换成其他数字也是一个意思