搜搜考试网mathematica的画图问题
来源：学生作业帮 编辑：搜搜考试网作业帮 分类：综合作业 时间：2024/07/28 07:02: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}]
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}]
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}]