作业帮mathematica的画图问题mathematica8里输好后执行没有显示,为什么?a = {Sin[1], 2 Sin[1/2], 3 Sin[1/3]};Do[a = Append[a, i Sin[1/i]]; ListPlot[a, PlotRange -> {0, 2}, PlotStyle -> PointSize[0.018]], {i, 4, 20}]
来源：学生作业帮助网 编辑：作业帮 时间：2024/05/02 18:09:57
![mathematica的画图问题mathematica8里输好后执行没有显示,为什么?a = {Sin[1], 2 Sin[1/2], 3 Sin[1/3]};Do[a = Append[a, i Sin[1/i]]; ListPlot[a, PlotRange -> {0, 2}, PlotStyle -> PointSize[0.018]], {i, 4, 20}]](/uploads/image/z/3597629-5-9.jpg?t=mathematica%E7%9A%84%E7%94%BB%E5%9B%BE%E9%97%AE%E9%A2%98mathematica8%E9%87%8C%E8%BE%93%E5%A5%BD%E5%90%8E%E6%89%A7%E8%A1%8C%E6%B2%A1%E6%9C%89%E6%98%BE%E7%A4%BA%2C%E4%B8%BA%E4%BB%80%E4%B9%88%3Fa+%3D+%7BSin%5B1%5D%2C+2+Sin%5B1%2F2%5D%2C+3+Sin%5B1%2F3%5D%7D%3BDo%5Ba+%3D+Append%5Ba%2C+i+Sin%5B1%2Fi%5D%5D%3B++ListPlot%5Ba%2C+PlotRange+-%3E+%7B0%2C+2%7D%2C+PlotStyle+-%3E+PointSize%5B0.018%5D%5D%2C+%7Bi%2C+++4%2C+20%7D%5D)
mathematica的画图问题mathematica8里输好后执行没有显示,为什么?a = {Sin[1], 2 Sin[1/2], 3 Sin[1/3]};Do[a = Append[a, i Sin[1/i]]; ListPlot[a, PlotRange -> {0, 2}, PlotStyle -> PointSize[0.018]], {i, 4, 20}]
mathematica的画图问题
mathematica8里输好后执行没有显示,为什么?
a = {Sin[1], 2 Sin[1/2], 3 Sin[1/3]};
Do[a = Append[a, i Sin[1/i]];
ListPlot[a, PlotRange -> {0, 2}, PlotStyle -> PointSize[0.018]], {i,
4, 20}]
mathematica的画图问题mathematica8里输好后执行没有显示,为什么?a = {Sin[1], 2 Sin[1/2], 3 Sin[1/3]};Do[a = Append[a, i Sin[1/i]]; ListPlot[a, PlotRange -> {0, 2}, PlotStyle -> PointSize[0.018]], {i, 4, 20}]
Do只执行过程,结果在内核中有,但不在笔记本中打印出来,加一个Print可以显示
a = {Sin[1],2 Sin[1/2],3 Sin[1/3]};
Do[a = Append[a,i Sin[1/i]];
Print@ListPlot[a,PlotRange -> {0,2},
PlotStyle -> PointSize[0.018]],{i,4,20}]
首先要加载Graphics`ImplicitPlot`函数库加载方法为：<<Graphics`ImplicitPlot` 有以下的命令： ImplicitPlot[eqn,{x,xmin,xmax}] 先用Solve命令求解，再